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REM % 


IDENTIFICATION 


PRODUCT CODE: AC-8536D-NC 

PRODUCT NAME: CZDMADO DM11A LGC TST 
DATE RELEASED: APRIL 1978 
MAINTAINER: DIAGNOSTIC GROUP 


THE INFORMATION IN THIS DOCUMENT 1S SUBJECT TO CHANGE WITHOUT 
NOTICE AND T BE CONSTR 
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VED ASA C 
10N. DIGITAL EQUIPMENT CORPORATION ASSUMES NO 
ERRORS THAT MAY APPEAR IN THIS DOCUMENT. 









OR RELIABILITY OF 
BY DIGITAL OR ITS 





NO RESPONSIBILITY 1S ASSUMED FOR 
SOF THWARE EQUIPMENT THAT IS NOT 
AFFILIATED COMPANIES. 

COPYRIGHT (C) 1972.1978 BY DIGITAL EQUIPMENT CORPORATION 

THE FOLLOWING ARE TRADEMARKS OF DIGITAL EQUIPMENT CORPORATION. 
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1. ABSTRACT 
THO SEPARATE 4 
11A ¢ 











ITTER SCOPE LOOP 
PRG2 - TRANSMIT/RECEIVE SCOPE LOOP 
REQUIREMENTS 
2. 1 EQUIPMENT 
A. POP 11 FAMILY PROCESSER 
8. OM11 


JUMPERS CONNECTING 16 TRANSMITTERS TO THEIR RESPECTIVE 
RECEIVERS. 


2.2 STORAGE 


THIS PROGRAM USES ALL OF CORE (8K) EXCEPT THAT AREA RESERVED 
FOR THE LOADERS. 


3. LOADING PROCEEDURE 
THE ABSOLUTE LOADER 1S USED TO LOAD THE PROGRAN. 
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USE PROCEDURE 
STARTING PROCEDURE 


BEFORE STARTING MAKE SURE THAT THE TTY IS IN REMOTE MODE, AND THE 
JUMPERS ARE INSTALLED. THREE STARTING ADDRESSES ARE PROVIDED. 


0200 - THIS STARTING ADDRESS REQUESTS DMi1 PARAMETERS. AND MUST 
BE USED TO INITIALLY START THE PROGRAM, AND WHENEVER ANY OF THE 
PARAMETERS LISTED BELOW 1S CHANGED. 


A. VECTOR ADDRESS ? 


RESPONSE: TYPE IN THE VECTOR ADDRESS OF THE DM11 RECEIVER 
UNDER TEST. CARRIAGE RETURN SELECTS 0300 


B. UNIT 8(8)? 
RESPONSE: THE DM11 UNIT NUMBER CORRESPONDS TO THE 
RODRESS TO WHICH THE CONTROL STATUS REGISTER (CSR) RESPONDS. 


= ADDRESS OMi1 UNIT @ fo ADDRESS -_ UNIT & 


75000 0 75100 

175010 i 175110 11 
175020 2 175120 12 
175030 3 175130 13 
175040 4 175140 14 
175050 5 175150 15 
175060 6 175160 16 
175070 7 175170 17 


CARRIAGE RETURN SELECTS UNIT @ O 













C. WHAT 1S THE CHARACTER LENGTH? 
D. 
RESPONSE: TYPE PROGRAM NUMBER OF PROGRAN YOU WISH TO 
RUN. CARRIAGE RETURN SELECTS PROGRAN & 0. 
NOTES: 











mY lage RETURN € RESPONSE WITT ST in A? TYPEOUT AND 
THE PARAMETER WILL AGAIN BE REQUESTED. 


0204 - THIS STARTING ss PREVIOUSLY DEFINED DM11 
PARAMETERS AND REQUEST THE PROGRAM NUMBER OF THE 
PROGRAM YOU WISH TO RUN. 


0210 - THIS STARTING ADDRESS STARTS THE PREVIOUSLY SELECTED 
PROGRAM USING PREVIOUSLY SELECTED PARAMETERS. 
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4.2 SWITCH SETTINGS 
THE FOLLOWING SWITCH SETTINGS APPLY TO PROGRAM 80. 


SR 0-6 ROUTINE TO BE RUN (IF ENABLED BY SR-9) 
SR 8 RING BELL ON ERR 

S& 9 LOOP SELECTED ROUTINE 

SR 11 INHIBIT ITERATION (DO EACH ROUTINE ONCE) 
SR 13 INHIBIT PRINTOU 

SR 14 SCOPE (LOOP ROUTINE) 

SR 15 HALT ON ER 





POSSIBLE RESPONSES ARE: 












1. <CR> ARE TO BE MADE 

2. 6 DIGITS 0-7 PRESENT IN OCTAL THE NEW SWITCH REGISTER 
VALUE ;LAST DIGIT FOLLOMED BY <CR>. 

3 U Ow VALUE IF ERROR IS COMMITTED 





TO ALLOW REENTERI 
KEYING IN SWREG VALUE. 


BUILT INTO 

NTS OF 
THE C NTENT SUREG. WHICH | 
CODE (iE) E ROUTINES, AFTE 






APPLICABLE AS. 


— — — — — — 
— — — 
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5.0 
5. 1 


PROGRAM DESCRIPTION 

PRGO - LOGIC TESTS 

PRGO og AE OF 152(8) INDEPENDENT ROUTINES WHICH TEST 
VAR | FUNCTIONS OF THE E. ANY 


10US Y OF THESE ROUTINES 
tie ee SELECTED AND RUN (SEE SEC. 4.2 FOR SWITCH 


ROUTINE DESCRIPTION 
ROUTINE TESTS 


RTO TESTS THE ABIL! FOUR OM11 oo 




















CONTROL STATUS REGISTE REGISTER 
BREAK STATUS REGISTER ¢ R 
* AN ILLE REF 





GAL RENC 
PROGRAM WILL INDICATE 
RS LONG AS THE ERROR C 
RTO PC =XXXXXX 


RTi-RT10 BIT ‘BANGS’ 
EACH BIT IN THE CSR C 
TYPES ARE DETECTED IN 
BIT FAILED TO CLEAR. 
FRILED AND THE PC 








— — — — 
— — — — — — — — — — — ——— — — — — 
NT 
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INARY COUNT PATTERN INTO THE BKCSR AND READS BACK 
HE oie READ BACK IS INCORRECT AN renee Sy een neD. 












H WILL CAUSE THE PROGRAN TO RELOAD THE BINAR 
ee THE TEST. THE ERROR TYPEOUT SHOWS CORRECT AND 
THE 1ON OF THE TEST CLEARS THE PREVIOUSLY LOADED NUMBER 
iF ITCH IS SET THE PROGRAM LOOPS BACK AND REPEATS 
THE NSTRUCT 1 ON. 
RT13 RANDOM NUMBERS INTO THE BKCSR. IF A 
RANDOM ECTLY AN ERROR IS INDICATED SHOWING 
THE CORRECT AND AC 


RT14% THIS ROUTINE TESTS THAT RESET WILL CLEAR ALL BREAK STATUS REG- 
_ IF ALL BITS DC NOT CLEAR WHEN THE RESET 1S GIVEN 
TYPEOUT SHOWS THE CORRECT RESULT 








iTS CAN BE INDIVIDUALLY 
: THE BAR THEREBY 
1S CLEARED. THE ERROR 


8 
TS 
AND CLEAR CLEAR ALL BAR BITS 





T 
SHOWS CORRECT AND ACTUAL RESULTS. 


RT20 THIS ROUTINE TESTS THAT RESE 
THE ERROR TYPEOUT 


RTZ1-RT23 THESE ROUTINES TEST THAT THE CSR 
PROPERLY TO BYTE COMMANDS. BOTH BYTES ARE 









- BAR. AND BKCSR RESPOND 
REFERENCED IN THESE 

















ROUTINES USING CLRB INSTRUCTIONS. THE ERROR TYPEOUT SHOMS CORRECT 
AND ACTUAL RESULTS. 

RT24 THIS TESTS THAT THE Dri —8 — ——— THE PROCESSOR 
VIA THE OVER RUN BIT (CSR BIT 13). THE E TYPEOUT THE 





ROUTINE NUMBER AND THE PC WHERE THE ERROR WAS DETECTED. 












RT25 THIS ROUTINE TESTS THAT THE DM11 INTERRUPTS THE PROCESSER 
AT THE PROPER LEVEL. 

RT26-RT4S THESE ROUTINES TEST THE BASIC TRANSMITTER FUNCTIONS 
ON EACH LINE 

RT46-RTES THESE ROUTINES TEST THE BASIC RECEIVER FUNCTIONS ON 
EACH LINE 

RT66 THIS ROUTINE TESTS THAT THE DM11 WILL 

(CSR BIT 1%). N THE RIES TO TRANSMIT 

MEMORY. ALL L ARE | 

SHOWS THE FAIL 










— — — — — — 
— — — — — — — — — — 
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SEQ 0007 
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(CSR BIT 14) SETS 


NEX BIT 
S TO REFERENCE THE TUMBLE TABLE THAT IS IN NON- 


NE_TESTS THAT THE 





THE TYPEOUT SHOUN 


ON LINE O 


DATA WAS RECEIVED 


: 





: 


PC=XXXXXX 


RT70 








we 

Ww 

ao 
& 


— 
Bo. 


5 
—* 


ee 
a 





Seti 
— 
— 





i 
—29 
Se 
- ax =z 
ea— 











— 


8885888 


ew Qo 8 
‘ * 
* 


z888 
—11 


wig 





vete 


RECEIVE CORRECT 


CORE LOCATION IS 
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13: 44 
R THAT THE TRANSMITTER CAN TRANSMIT 
1 OUTINE TESTS THAT EXACTLY 
i REROY (CSR BIT15) 
E PEQUT GIVES THE NUMBER 
OF AN ERROR, AND THE FAILING LINE 





ROUTINE TESTS THAT THE DM11 WILL STORE DATA SEQUENTIALLY 
LE TABLE AND ALSO THAT POINTER RETURNS TO THE TOP 
LE WHEN 64% CHARACTERS HAVE BEEN RECEIVED. 


RT75-114 THESE ROUTINES CHECK THAT A BREAK CAN BE 
TRANSMITTED AND RECEIVED ON ALL AL INES. 


R115-R134 THESE ROUTINES INDIVIDUALLY TRANSMIT, RECEIVE 
AND CHECK DATA PLUS PARITY ON EACH OF THE 16 DM11 LINES. ONLY 
DATA AND PARITY ERRORS ARE REPORTED. 


RT131 _ THIS ROUTINE SIMULTANEOUSLY TRANSMITS AND RECEIVES A 

CHARACTER (ALL 1°S) ON THE 16 OM11 LINES THE FOLLOWING TESTS 

ARE PERFORMED: 
A: THERE ARE 16 DATA ENTRIES (1 PER LINE) 
: THERE ISN'T A 17TH ENTRY 

C: DATA 1S CORRECT 

D: ONE ENTRY FOR EACH LINE 


RT136 THIS ROUTINE TRANSMITS A BREAK ON EACH LINE. TESTS PERFORMED 
ARE THE SAME AS IN RT136. 


~ 
aa 



















TESTS. TE ARE 
ARE NOT SET DURING 
RT145 THIS ROUT! 
BIT (CSR BIT1) 


RT14G THIS ROUT! 
HALT’ 


PROGRAM 1 ALLOMS 
WITH THE DMii CONTI 





PR 
THE OM11 CONTINUOUL 
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PROGRAM 1 AND PROGRAM 2 PARAMETERS 
PR 1 OR 


WHEN PROGRAM PROGRAM 2 ARE SELECTED ADDITIONAL PARAMETERS WILL 
BE REQUESTED BY EACH PROGRAM AS SHOWN BELOW. 


A: TYPE LINES TO BE TESTED 


EXAMPLES: 

‘ile * SELECT LINE(S) 

3 1,0 

10 3 

17 3.2.1.0 

50 . 

3101 10.7,6.0 

ioe 14,13. 12,11,10,7,6,.5,4,3 


177777 L 
NOTE. LINE NUMBERS ARE GIVEN IN OCTAL. 


B: HOW MANY CHARACTERS 
TYPE THE NUMBER OF CHARACTERS YOU WISH TO TRANSMIT. NOTE. 
mem” OF CHARACTERS MUST BE LESS THAN 200. AND IS TAKEN 


C: PUT CHARACTER IN SR (0-7); DELAY IN SR (8-15) 
SELF-EXPLANATORY. NOTE. THE DELAY REFERS TO A DELAY AFTER 
ALL THE CHARACTERS HAVE BEEN TRANSMITTED AND BEFORE A NEU 
TRANSNISSION PERIOD BEGINS. 






















PERFORMED ON EACH UNIT. 
#5184 PRESS START). TURN 
WILL TYPE OUT THE POWER FAIL 










_ LOWER SR 9 AND WAIT FOR END OF 


RING A RESET INSTRUCTION THE 
REPEAT THE TEST 









NOTE: IF THE P | 
PROGRAM WILL HALT. 


CONTENTS OF RTNNO. THE 
THAT WAS RUNNING AT THE TIME 
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. TITLE CZOMADO DM11A LGC TST 






















413 LIST — ME, BIN, SEQ | 
* . ENABLE ABS. ANA | 
416 *+CZ0MADO OMI1A LGC TST 
417 +PRGO- INPUT-OUTPUT LOGIC TESTS 
418 +PRGi- TRANSMITTER SCOPE LOOP 
419 +PRGZ- TRANSMIT/RECEIVE SCOPE LOOP 
420 ‘STANDARD SR SWITCH OPTIONS (SWITCH SET TO A1 ) 
421 ; T ON ERROR 
422 ° 
423 
424 
425 
426 
427 ; 
428 RING BELL ON AN ERROR 
= +SR6 THROUGH SRO - NUMBER OF ROUTINE TO BE LOOPED. 
431 +EQUATE STATEMENTS 
432 177776 CC2177776 
433 177776 
434 000004 *+ADDRESS OF ERROR TRAP VECTOR 
435 000240 
436 000000 
437 100000 
438 100000 
439 040000 L 
440 020000 L 
441 010000 
442 004000 LB! 
443 002000 LB 
4&G 001000 LB 
445 000400 LB 
446 LB 
447 000100 LB 
448 000040 L8 
449 LB 
450 000010 LBIT3= 
451 000004 LBITZ= 
452 000002 LeITi 
453 000001 Lg 1TO= 
454 100000 BITIS= 
455 040060 8iTi42 
456 BITiz= 
= fee Hie 
ms 
459 002000 38—— 
3 86 Hist: 
462 81172200 
463 000100 81T62100 
464 000040 B81 T5=40 
465 000020 81T4=20 





CZDMADO DM11A LGC TST 


CZDMAD. 


Pil 


28-RPR-78 
000010 





MA 
13 


*+LINE NUMBERS 


eit 30A(1052) 28-APR-78 13:48 PAGE 







PRTYO=0 
L INEO=0 


* 
“ 


52 
6= 


J sa so sd ed od ll ld sd 








LAYs 
ELL=007 


L 
1 


Bark 


+POP THE STACK. SAME AS TST (6)+ 
E. SAME AS CHP (6)+, (6)+ 


SEQ 0011 


—1.1 
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522 177777 RTLAST=-1 
524 000000 =0 

525 177777 X=-1 

526 000000 A=0 

527 000000 20 

528 000000 000002 +2 ; UNASSIGNED TRAP 

529 000002 000000 HALT 

530 OO000% oco0006 MACHER: . +2 ;SP OVERFLOW. BUS ERROR TRAP 
531 000006 O00000 HALT 

532 000010 000012 +2 ;RESERVED INSTRUCTION TRAP 
533 000012 9o00000 HALT 

538 00001% 000016 +2 ; TRACE TRAP 

535 000016 o00000 HALT 

a3? B—— WALT — welbie 

— — — — ore ae 

540 000030 003100 EMTINT 7EMT TRAP 

541 O00032 O00340 PRTY? 

xz — 906000 OLY ; TRAP TRAP. SIMILAR TO ENT 
584 QO0080 000042 42 

ss 900082 g00000 HALT ; TRAPPED TO PREVIOUS ADDRESS. 
a? 000086 o00000 HALT ; TRAPPED TO PREVIOUS ADDRESS. 
x9 conus — goa0c0 nat HALT ; TRAPPED TO PREVIOUS RDORESS. 
51 000056 go0000 HALT 3 TRAPPED TO PREVIOUS ADDRESS. 
S53 ——— XX HALT ; TRAPPED TO PREVIOUS ADORESS. 
* 000066 000000 HALT ; TRAPPED TO PREVIOUS ADORESS. 
557 000072 o00000 HALT ; TRAPPED TO PREVIOUS ADORESS. 
S58 000078 000076 42 

559 000076 HALT ; TRAPPED TO PREVIOUS ADDRESS. 
set 000102 0 HALT ; TRAPPED TO PREVIOUS ADDRESS. 
63 88 — HALT ; TRAPPED TO PREVIOUS ADDRESS. 
66 8 go0000 HALT ; TRAPPED TO PREVIOUS ADDRESS. 
se? dont te * HALT 2 TRAPPED TO PREVIOUS ADDRESS. 
569 32 00 HALT ; TRAPPED TO PREVIOUS ADDRESS. 
ort 00g! 0 HALT ; TRAPPED TO PREVIOUS ADDRESS. 
* pst 32 00 HALT ; TRAPPED TO PREVIOUS RDDRESS. 
575 Ooo! eH HAL T ; TRAPPED TO PREVIOUS ADDRESS. 
576 000140 000142 42 

577 000142 OO0000 HALT ; TRAPPED TO PREVIOUS ADORESS. 


— — — — — — — 
— — — — — 

— — — — — — — — — — — 

— — LT TS — — — — — — — — — —— 
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578 
579 









SRSRRSERSES ESRF Tse se eeeeReees 





000170 
0001 7% 
000176 
000200 
000202 
GOOD 
000206 
000210 
oats 
000216 
000220 
00230 
000232 
000238 
000236 
GO00240 
060282 
000284 
000246 
000250 
OO0254 
a 
E 

§ 





000152 
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000146 
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hoo 


+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADORESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVICUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADORESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADORESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADORESS. 
+ TRAPPED TO PREVIOUS ADORESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 


SEQ 0013 
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+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 
+ TRAPPED TO PREVIOUS ADDRESS. 


— — — — — — 
— — — — — — — 
— — — — — — —“ 
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658 


000176 


SaTeATANITTRIRRGSSSSGHRRRSERSESSSSossosces 





222 
825 


000046 
003036 
000052 
060000 


000174 


0001 





fF 





SE SG EERO REEEEUOEREOETEDEREE 
2 § Beae 
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002360 





28-APR-78 


DISPREG: 
SWREG: 


SPBOT: 





DISPLAY: 


CAT: 
WCT: 
BAT: 











BBVeees 
28222 





C 
13:48 PAGE 15 


2174 
0 
0 


. =200 
JMP Qe START 
JMP @ERSTATI 


JMP @ERSTAT2Z 


+ 4 
3 8 


gigsscerjssggnesacasei:y 
< £8 % 





AB+1 28. 


“= 
28 
2d 
S&S 


+GO TO START OF DIAGNOSTIC 

+60 GET PROGRAM 8 & RESTART PROGRAN 
USING PREVIOUS OM11 PARAMETERS 

; RESTART PREVI VIOUS PROGRAN USING 
;PREVIOUS DMi1 PARAPE TERS 










+ STARTING ADDRESS OF 
+ CURRENT 





TUE ime OF 
Bp CUREEIN eS 











NT ITERATION COUNT 
CURRENT SCOPE POINTER. 





713 


— DD DD LEI ON STS TRS SSERREEe 
— —— 





007120 
016524 
016604 
003322 
002126 
000000 


177562 


TEIN 





oh 30A (1052) 


Z28-APR-78 13:4 


28-APR-78 


RSTART: peace 


ENTTAB: 





D 
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‘PRGO RESTART ADORE SS 
;PRG1 


* 
oe 0 


+PRGZ 

POINTER TO TYPEOUT ROUTINE 
+POINTER TO ERROR ROUTINE 

+POINTER TO DATA COMPARISON ROUTINE 


‘POINTER TO RESET ROUTINE 
‘POINTER TO SCOPE ROUTINE 

+POINTER TO SAVE REGISTERS ROUTINE 
+POINTER TO RESTORE REGISTERS ROUTINE 
‘POINTER TO ERROR1 ROUTINE 

+POINTER TO INITIALIZE ROUTINE 








SEQ 0016 
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744 
745 
746 
747 
748 
749 


SIIAIINIAIAVRAIAAIAAIIIZIIVIIIS zzz A z2 FAVA Aavaa9 
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ae 


cE 
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13 





001570 


002246 
002102 


002246 
002102 


176766 


176720 


177574 


E 
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+ROUTINE TO TYPE OUT INCORRECT ROUTINE SELECTED 

INCRTN: TYPE 
mi + TYPE INCORRECT ROUTINE SELECTED. 
RTS x7 EXIT. 


DATA COMPARISON ROUTINE. 





OT CHK: CHP RCVDAT, XMTDAT ; COMPARE RECE IVED & TRANSMITTED DATA 
JSR 7, CNVDAT ; CONVERT RCVDAT & XHTDAT TO ASCII 


ERROR 1 
1$: RTI + EXIT. 


‘ERROR ROUTINE WHENEVER THE PROGAN DETECTS AN ERROR THE ERROR 
;AND ERROR1 EMT INSTRUCTIONS ENTER HERE. ERROR AT ERR: . AND 









SERROR1 AT ERR: 
ERR: MOV ;MOV BR . +6 TO ERRB 
;GET PC WHERE ERROR OCCURRED 
ERR1: 
ERRA: 





ERRC: 
ERRD: 
sHALT ON ERROR 
260 TO EXIT IF NO HALT ON ERROR 
ERRHLT: 
ERREX: 


sCHECK FOR G 
} RETURN 


+SUBROUTINE TO CONVERT RCVDAT AND XMTDAT TO ASCII AND PLACE 





— — — — 
— — — — 
— — — — ——— — 





r 
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7399 + IN MESSAGE. 

800 004537 006154 CNVDAT: JSR 5, OACNV 

801 001570 XMTDAT 

802 017766 AASB 

803 000006 6 

804 004537 006154 JSR 5, OACNV 

805 001566 RCVDAT 

806 020002 AWAS 

807? 002354 000006 6 

—8* 002356 000207 RTS 7 sEXIT 


— 
—2 
oO 


CZDMADO DM11A LGC TST 
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818 


Oo 
LSS LEE LEE eet ttt iaterttatssttstatstt 





012706 


au 





ne 


fHH menue 





— 
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os 
o 
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+SET UP AE eal 


8RT70, GERTES+2 
SKI P RT66 AND RT67 


i TRAP OCCURRED, NO KT11 PRESENT. 
SERRVEC42, ARERRVEC 


J 
: O 
8 





— 
“ 









389 


$e 
~4 





333° 
e 


2 





owe. — 
A32 





SEQ 0019 


+SEE IF SWITCH-LESS a CESEen 


+ TEST FOR KT11 
KT11 PRESENT. SET UP TO 





+ OUT ae f (SET a dL LEVEL 7) 


T OM11 PARANETE 
>ACTI1? 


+GET PRGNUN AND PUT IT 
> MERE 


7MASK OFF UNUSED BITS 
;SHIFT PROGRAM & 





PROGRAM & 


+RESET ERROR TRAP 
+GET 
> 60 START PROGRAM 


GET PROGRAN & 
GO RESTART PROGRAN 


sACTII? 


+ TYPE MESSAGE TO REQUEST SNITCH 
;REGISTER SETTINGS 
SMAIT FOR OPERATOR TO SET SWITCHES 


GO GET SWREG SETTINGS 
sAOOR OF 1ST ROUTINE TO gh 
sRESET ERROR TRAP VECT 













*ROLL + oA 
CHECK SELECT ROUTINE SNITCH 
‘BRANCH IF SELECT ROUTINE SNITCH IS SET. 








Ee ——— ——— — 


CZDMAD0 
CZDMAD. P11 





SSESEEEEEEE ST LETC EPP E PREECE LLC Ree phe 
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003100 


lene G uae 
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177144 
176336 
177600 





177120 
177777 


002120 











176246 


176232 
000046 


176176 
002006 
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B 
GTROYC: 
B 


J 
GTRDYD: . 








FORWD: 


F ORWDA: 





PEEEEELT Pie BEer Ey 


JMP 














CLR @cSR 
CLR @BKCSR 
INITIALIZE 
Vv SCOPTR, (SP) 
BIT #61T14%, 
BE sc 
at 





BIT 
ChP 


TST 
BEQ 










=m 
“ 





4 





5s) 
~4 
“ 







23 
Ex 








3 


STRERAL 
338 
a § 


i 


: 
* 








ENT TRAP INTERPRETER 
EM (6),-(6) 


TINT: 


MOV 






on 
33 





MOT LAST ROUTINE. 
T ROUTINE SELECTED. 


Be Be Be Be Be Se Be Be Be Be Be 


w~<@ 
4mm" 










+RETURN TO 
sTEST INHIBIT ITERATION SuiTCH 
ene iF INHIBIT ITERATION Su SET. 





0. 
; SELECT ROUTINE SWITCH 
+BRANCH IF SELECT RIN Su SET 


st ’ 

>BRANCH IF NOT LAST TEST. 

3 TYPE 

; “PRGEND* 

>CHECK XXDP/ACT11 MOMITOR HOOK 







+RETURN TO XXDP/ACT11 MONITOR 


Y POINTER. 
NOW CURRENT TEST TO CURTST. 
FORWD SUBROUTINE. 


‘GET PC OF NEXT INSTRUCTION 


C 





SeaBSRESE & 


REE 





SSSATSSSSSLRR KLARA ELYRIA 8999999992222 
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ZOMAD. P11 Z28-APR-78 13:4 


162716 
011637 
017616 


006316 
062716 
013607 


33288 


o 
—— 
— 
o 






vi Beeenee EERaezivee 


22 






te 30R (1052) 


000002 
002100 
000000 
000001 


002032 











| 2 
13:48 PAGE 21 









28-APR-78 
SUB #2, (6) 
MOV (6),PCADD 
MOV @(6), (6) 
CLRB 1(6) 
ASL (6) 
ADD SENTTAB, (6) 
MoV 8(6)+4, %7 
‘SAVE REGS 0 TO 4 ROUT | 
SAVRG: MOV (6)4, SVRPC 
(6)+, SVRPSW 
%4,-(6) 
%3.-(6) 
%2,-(6) 
%1,-(6) 
20. -(6) 
SVRPSU. -(6) 
C. -(6) 
TO 4% SUBROUTINE. 
(6)4, RSTPC 
(6)4,.RS1P 
d+, XO 
(6)4, %1 
(6)4,%2 
nov (6)4,%3 
nov (634, %4 
MoV RSTPSU, -(6) 
rr RSTPC. -(6) 
RSTPC: OPEN 
RSTPSH: OPEN 
sROUTINE TO ISSUE RESET. 
SRSETT: nov 852525, 





x0 

XO. SRSETT+2 
RESET 

RTI 





;RANDOM NUMBER GENERATOR ROUTINE EXITS WI 
RNGEN: nov 


RP 1,20 








+FORM PC OF EMT INSTRUCTION 
+GET PC OF EMT INSTRUCTION 


ON 
*+CLEAR MSH OF EMT INSTRUCTION 
; SHIFT EMT IDENTIFIER 
+GO TO PROPER ENT 
+ SAVE PC AND PSU. 


+SAVE REGS O - 4 
+ IN STACK. 


sRESTORE PC AND PSH 
s EXIT. 


+ SAVE PC AND PSH 


+RESTORE REGS 0 - 4 
+FROM STACK. 


+RESTORE PC AND PSH 






sEXIT 

. sDRTA TO RO. 
3 +2. 

PS | . (80) is 
+DISPLAYED. EXIT. 


TH NUMBER IN REGISTER 0 


J 2 
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ty ge TO INITIALIZE STACK POINTER AND SET PROCESSOR PRIORITY 
iINn’tT: MOV @CAT. aBRSREG ⸗ INITIALIZE THE BASE REGISTER 

nov SPRTY7. PSU sSET PRIORITY LEVEL 7 
(SP). SPBOT :GET RETURN 
sSET BOTTOM OF THE STACK 
>RETURN 
















CZDMAD. P11 Z28-APR-78 13: 44 
379 003310 013700 003316 MOV RP1,%0 
380 003314 000207 RTS %7 EXIT. NUMBER IN RO 
981 003316 RP 1: 1233 
3982 003320 RP 2: 7622 
963 sSUBROUTINE TO OUTPUT ASCI/ MESSAGE ON TELETYPE PRINTER. 
fo 003322 TYP: nov 2X6. %0 +GET a THAT CONTAINS MESSAGE ADDRESS. 
386 003330 Mov 0x0, x0 
987 003332 TYPAR: MOVE (0)+, TYPDAT 
388 O03 003432 C #100, TYPDAT 
a COIN TYPC 
991 003360 OO3432 TYPC: 845, TYPDAT 
992 003356 TYPF 9 % 
—* oe ene + TYPE CHAR IN TYPDAT 
3995 O33 176500 TYPD: TYPDAT. @TPDBR + ; OUTPUT CHARACTER TO PRINTER 
3396 O03374 aTPCSR s+WAIT FOR DONE FLAG. 
997 O30 * 
998 8360 %7 s EXIT 
999 GOO 003432 815. TYPDAT : CARRIAGE RETURN CODE TO TYPDAT 
1000 O034812 2 ; CHAR. 
1001 OO03816 003432 #12, TYPDAT sMOVE LF CODE TO TYPDAT 
1002 OO382 %7. TYPO ; CHAR. 
1003 G03430 
100% 003432 
OO34 34 
003442 
003450 
OO 3454 
003460 









ase) 





+SUBROUTINE TO GET OM11 PARANETERS 
ChP 


; VECTOR 
DMPRR: 842, a8NG sACTI17? 
BR IF NO 























6$ 

sS$i2e fae INTERRUPT VECTOR IN AUTO NODE 

—* RO +SET UP FLOATING VECT AREA 

nov 

TST 

ChP 

6PL 

NOV ‘SET BPT VECT 

nov P 

od SET TO xmIT 1 CHAR 
000106 : —4 nt Tyee eso. acs 0 sSET IE 

175754 MOV aLBITo, sRXMiT 

177797 02076 Rov AR4-COUNT WAIT 


— — — — — — —— 
— — — — — — 


LL — —— ————— — — — — — — — — 


K 2 
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003576 002076 25: DEC COUNT 
88* ERROR - ;NO INT OC CURRED 
003606 BR 35 — REPEAT 
003610 Ss: SUB #4, (SP) ; CALC int VECT 
003618 003650 MOV (SP), @@VECTOR ;STORE IT 
003620 000016 000014 MoV #16, 0814 ; RESTORE BPT VECT 
003626 004 372 JSR 7, OVRLAY +2, HALT IN VECT AREA 
0036.38 004% 372 6S: JSR 7, OVRLAY ;PUT MALT..42 IN VECTOR AREA 
003680 108000 TYPE ;ASK USER FOR RECEIVER INT. VECTOR 
0036"2 WHERE ;0F UNIT R TEST 
00368% 008537 JSR 5. RECD ;GET VECTOR AND PUT IT 
003650 000000 VECTOR: 0 ; MERE 
003652 005737 TST VECTOR 
003656 001003 BNE VE COK 
003660 012737 000300 MOV #300. VECTOR ;SET VECTOR = TO 0300 
003666 023727 003650 000300 VECOK: CHP VECTOR, #300 71S VECTOR HIGHER OR 
003678 103003 BHiS VECOKB i€ TO 0300 
003676 iovo00 VECOKA: TYPE ; TYPE °?° 
003702 000670 BR DMPAR ;ASK FOR ANOTHER VECTOR 
003708 023727 003650 000770 VECOKB: CHP VECTOR, 8770 :1§ 454* TO OR 
003712 10137 BHI LESS THAN 
003718 032737 000007 003650 BIT 87. VECTOR 7LSB OF VECTOR MUST BE ALL O'S 
5 585* 003650 001552 noe VECTOR CLKINT 
003732 062737 O0000% 003650 ADD 4, VECTOR 
003780 013737 003650 001556 MOV VECTOR. STINT 
NUNBER 
003786 023737 O000%2 ocD0nNs : CMP G842, ahs ;ACT11? 
003758 001405 BEQ UNIT42 788 IF YES 
003756 108000 TYPE 
003760 0617725 WHICH 
003762 8 004416 es ase :GET UNIT AND PUT IT 
55 023727 003766 000017 Enp inn SELECTED {must BE 
1073 003776 101403 8LOS ;BETMEEN 0 
1075 ? NY 
igre 003766 UNTOKA: a 
1078 003766 ASL 
1079 ASL 
* i 
1082 1 000370 UNTOKB: BIC ;FORM ADORESSES OF 
1083 | 003766 ADD 7REGISTERS OF UNIT SELECTED 
— 005302 DEC 
10g5 001372 BNE 
ine 22 012702 000004 MoV 
—88 8— NOV 
1090 004062 012311 UNTOKC: MOV ;FORM ODD BYTE ADDRESSES 








L 
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INC (1)4 
DEC %2 


BNE UNTOKC 
: CHARACTER LENGTH 
DMPARC: CMP 42, a846 sACTI17? 

EQ LENGTH+2 BR IF YES 

TYPE 

LEVEL 

JSR 5. RECD +GET LENGTH AND PUT IT 
LENGTH: O + HERE 


LENGTH 
LENOKA 









LENOKA: 
LENOKB: 


+ CHARACTER LENGTH SELECTED musT 
;BE BETMEEN N 5- 
+ CARRIAGE RETURN SELECTS 8 





LENOKC: 


LENGTH. x1 
LENOKD( 1). S@CARNSK +SET CHARACTER LENGTH MASK 
? sEXIT PARAMETERS ROUTINE 


REPRESENTS THE CHARACTER LENGTH MASK FOR 5.6.7. AND 8 
TER RESPECTIVELY. 





zi 
$333 


Lm 
aa 
R 





‘INCREMENT men TIME TO TRANSMIT 


‘SET PROCESSER PRIORITY LEVEL = ? 
‘TRANSMITTER FAILED TO INTERRUPT 





TIMEC: 





HORUS i 





ee le 
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CZDMAD. P11 
1147 O04 
004 356 
004 362 
00% 364 


Z28-APR-78 13: 44 


000241 








006037 004370 
022626 





000302 
177776 


000776 


175340 








2 


ROR TIME14 
POPSP2 +RESTORE STACK POINTER 
RTS 7 sEXIT TIME CALCULATION ROUTINE 


: OPEN +CONTRINS MACHINE TIME TO —* 1 CHAR 


‘CONTAIN TIME TO XMIT 1/44 € 


s SUBROUTINE TO PUT HALT.. +2 IN VECTOR ARER (0300-1000) 
OVRLAY: MOV #302.R2 
1$: nov RZ. -2¢(R2) 

CLR (R2)4 

TST (RZ)4 

CMP #776,R2 

BPL 

RTS 






UP TO SIX OCTAL 
ING THE SUBROUTINE 
ISTURBED. 

+ SUBROUTINE TO INPUT DATA F 















aah 

87. CNT 7SET CHAR COUNT 

@TKCSR sWARIT FOR CHAR 
sSTRiP OFF PARITY 
sECHO g 
sis ita UY 
sBRANCH IF YES 
21S if @ <C> 

BE sBRANCH IF YESS 


so” 


+ CHECK FOR 0-7 (8) 
sBRANCH IF NOT 


—8* 








et 

ASL ts 

ASL (6 sSHIFT DATA 

ba >; INSET NEM CHAR 

BE sONLY 6 CHRAR'S PLEASE 
ee *NEXT CHRRACTER 

BPL sWRIT FOR READY 

reve aTPORR s TYPE <LF> 

BL sWAIT FOR READY 7340 
CLR ;LORD CHAR 

TSTé 

BPL 





a, ee aaa ee = — = 










N | 
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OO%SS54% 005725 TST (RS)4 ; ADJUST RS | 
0048556 012600 MoV (SP )+, RO ;RESTORE RO | 
004560 RTS 88 | 
004562 7: TYPE 
004564 M4 
008566 5s: TYPE 
004572 BR 15 ;START OVER | 
008574 CNT: 0 
;POWER FAIL ROUTINE 
004576 PFAIL: MOV @PURUP, 24 
1215 004604 HALT 
;POWER UP SUBROUTINE 
PURUP: RESET ;GIVE TELEPRINTER TINE TO START 
v SSPBOT. % 
; TYPE POMER FAIL ERROR 
JMP @eRSTAT2 360 RESTART PROGRAN 





LINE TEST SUBROUTINE: THIS LINE TEST PROVIDES SEVERAL TESTS ON A DM11 LINE. 
THE SUBROUTINE CALLED BY JSR 5. LNTST. THIS INSTRUCTION PROVIDES THE 
MUIBER. THE FOLLOM! ARE PERFORMED: 








Se Se Ge Se Ge Se 























; READY 
004622 012537 XNTTST: NOV 
Gosess gueas7 ar 
008636 004537 1$: JSR 
OONG42 177777 be 
008644 012703 nov 
280 008660 005002 4 CLR 
1242 8* 5* * 
001 37% GNE 
33 
7. 1 ERROR 
174642 3S ist 
4 ERROR 
3701 4b. nov 
108011 ——— ERKOR | -ZERROR! KORO COUNT NOT EQUAL TO 0 
355 —o MoV "; CURRENT ADORESS SHOULD NOT HAVE INCREMENTED 
004736 001566 001570 CMP ; 
004744 001401 BEQ 





eee ae LGC TST 
CZDMAD. P 


1259 






06: 
004750 
00% 756 
C08 764 


% 





—J 


28-APR-78 


104011 
012777 











O_o ee [[[ 
8 


















3 
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ERROR 1 sERROR! CURRENT ADDR. DID NOT INCREMENT 
005002 174600 65: MoV #75. @XMTINT +LORD TRANSMITTER INTERRUPT VECTOR 
010000 174556 BIS #81712. acSR ; ENABLE TRANSHITTER INTERRUPT 
177776 ots an psu +SET PROCESSOR PRIORITY =0 
OOO340 177776 MoV #PRTY7, apsu 2 bes OUT INTERRUPTS 
ER — ten an FAILED TO INTERRUPT OR 
: INTERRUPTED TO 3 yy LOCATION PND HALTED WITH ADDRESS +2 DISPLAYED. 
CMP (6)+, (6)+ RESET STACK PTR 
177776 MoV aPRTY TY7, a@PSH ; LOCK OUT INTERRUPTS 
110000 174522 BIC #6 1T12+B1T15, acsa + CLEAR te iE & READY BITS 
174516 TST acsRr + TEST THAT READY CLEARED 
BPL 8$ 60 TO 
ERROR ; ERROR! a» cateD TO CLEAR 
8$: TST (6)+ +RESET STACK 
SCOPE + SCOPE 


C 3 
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OR+2 IN THE ADDRESS LIGHTS. 


;LORD ALL_1°S INTO OUTPUT BUFFER 
;CLEAR THE FIRST 


012737 177777 017102 








177776 








LIME SPECIFIED BY JSR 













Se 




















174442 #8170. acsR 60 BIT 
ca 
100000 174426 eit 
174420 18: acse 
ouezie tsp) 
001373 1$ 
104001 sERROR! CHAR. DONE FLAG FAILED To SET 
000550 * es : 60 ExiT ‘ 
5 174406 83%. aCLKINT sLORD RECEIVER INTERRUPT VEC. ADRS. 
052777 174370 eBiT 3SET RECEIVER IE BIT 
006037 at s€ Ei 
ress 177776 GPRTY?7. PSW sLOCK OUT INTERRUPTS 
104001 TRECE IVER FRILED TO INTERRUPT 
0006531 :60 TO ExIT 
012737 177776 35: 
G2262¢ (6)4, (6)4 
174332 #0 11748 1T6. aCSR ; 
100002 4§ 
boos 15 a8 


CZDMADO DMI1A LGC TST MACY11 30A(1052) 





CZDMAD. P11 Z28-RPR-78 13: 44 
1331 013737 001600 001566 
1332 04%2737 020000 001566 
012737 001570 
373? 001572 001570 


PEPE EE er ert tts 








* 
s 
ẽ 
ẽ 






= 
388 






= 





3 








— 





001401 


174056 


174036 





a: 
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4S: mov TUMTAB.RCVDAT ;GET TUMBLE TABLE ENTRY 
BIC CLEAR PARITY INDICAT | 
Mov +LOAD XMTDAT WITH TRANSMITTED DATA 
BIC + CLEAR NON TRANSMITTED BITS 
8188 +LOAD XMTDAT WITH PROPER LINE #8 
BIS +SET VALID DATA ENTRY BIT IN XMTDAT 
CMP RCVDAT. MITDAT  ; COMPARE TUMBLE TABLE ENTRY (RCYDAT) 8 
+CORRECT RESULT (XMTDAT) 
BEQ 54 a 
ERROR1 - ERROR! INCORRECT TUMBLE TABLE 
BR + NTRY; GO TO EXIT 
5S: CLR TUMNTAB 
MoV TUMNTAB+2 RCVDAT ; ET NEXT ENTRY 
BEQ 63 *B°ANCH IF ALL O'S 
CLR XMTDAT 
ERROR1 sERROR! FALSE ENTRY IN NEXT 
BR 88 + TUMBLE TRBLE ADDRESS 
6S: JSR 5, a#xXni TD > TRANSMIT 1 CHARACTER (ALL 1°S) 
-1 7ON LINE SPECIFIED BY JSR 
X zfo TRANSMITTER 
TST8 : TEST FOR THE DONE FLAG 
i 
mov ; THAT MARDMARE TUMBLE 
ae TABLE POINTER INCREMENTED (+42) 
7ERROR! TUMBLE TABLE POINTER DID 
sNOT INCREMENT: GO TO EXIT 
7$: > GET ENTRY 


oS OS op 
(SOY oe 
“ee 





2 
* 


333 
a8 







a 
j RANSNITTE 
; ANO 
; A 
; —574 
DATA 
8 MOV 
Vv 














- , 2 — 
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005512 000200 174022 BIC 18177, dCcSR CLEAR FLAG 

3055206 174022 CLR @BKCSR ;CLEAR BREAK BIT 

—5 001600 1$: aa) ne + TEST FOR VALID DATA ENTRY 

005532 alae - A el DATA ENTRY 

GOSS 3S 040000 001600 2%: BIT #61714. TUNTAB + TEST THAT BREAK BIT IS SET 

OO5544 BNE 3$ > IN TUMBLE T 

83 ERROR ;ERROR! BREAK BIT FAILED TO SET 

= 001600 34: ane Ls tite ; TEST THAT DATA !S ALL O'S 

MiSSe0 001566 CLR RCVDAT 

BAShe 9 001600 001566 nove TUMTAB. RCVDAT +GET RECEIVED DATA 

008672 001670 CLR TOAT 

005576 ERROR 1 sERROR! DATA WAS NOT ALL O'S 

005600 WS: SCOPE SCOPE 
; SUBROUTINE TO TRANSMIT VE ON ALL LINES THE DELAY BETWEEN 
> TRANSMITTING ON A 8 LIED BY THE CALLING JSR INSTRUCTION. 
CNOTE NO DATA CHECK ORMED BY THIS TEST 

005602 012537 002076 DLYXNT: MOV teDae [GET CHARACTER DELAY COUNT 

005606 005037 001570 CLR so XMTOAT 

005612 008537 006225 isk 5. BMOVE ;LOAD OUTPUT BUFFER WITH DATE 

005616 020233 HSG1 :TO BE TRANSMITTED 

005620 017102 OUTBUF 

006622 000100 64. 

005628 012737 MOVs SLBITO. aaLINBIT 

005632 005037 CLR SLIME 

005636 012777 1S: MOV SBITO, acsr ;SET THE GO BIT 

—— 008537 2s: JS 6. a28mItD S TRANSMIT 64. CHAR. 

005650 177700 3 ION A LINE 

005662 013737 HOV @BTINE1.4S 

005660 01370" HOV. SBCOUNT. 4 :GET CHARACTER DELAY COUNT 

05664 10400 38: DELAY 

005666 000000 + 

—— ks 

005674 052737 016730 AOD [FORM NEXT LINE NUMBER 

GOE702 606337 ASL :SHIFT LINE BIT 

006706 103356 BCC 7BRANCH IF ALL LINES NOT CONE 

005710 012708 000100 HOV 

006718 013737 008366 005724 

005722 108400 és. 

8 * 
001374 

— 363 

— SERROR! BAR SHOULD'VE BEEN CLEAR 

—— Geos 7s: ; TEST THAT ONLY DONE.GO.& READY BITS ARE SET 

as Se 1000 enrare 

005764 017737 173662 001 SGET CSR CONTENTS 


ö —— ee 
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005772 104011 ERROR1 + INCORRECT CSR CONTENTS 
005774 005726 8s: POPSP ;RESET THE STACK 
005776 104006 SCOPE ; SCOPE 
5 SSROUT tee TO et A SPECIFIED NUMBER OF MILLISECONDS 
006000 (6), ;GET DELAY COUNT ADDRESS 
006004 ADD #2. (6) ;SET UP EXIT ADDRESS 
006010 MOV a3, 3S ;GET DELAY COUNT 
006016 BEQ 25 ;EXIT IF NO DELAY 
8* ease * SUB Hee 
— an: 
0060%2 BNE 4 
006084 BR 1S 
O060%6 25: RTI SEXIT | 
006050 3S: OPEN ; CONTAINS DELAY COUNT 
006052 us. OPEN ; CONTAINS DELAY ROUTINE CONSTANT 
: SUBROUT INE TO INITIALIZE BINARY COUNT PATTERNS 
006054 177777 006076 INBIN: MOV 8-1, RIND ;SET ALL VARIABLES 
006062 006224 JSR %5, BMOVE ;TO MINUS 1 
88 * RIND+1 
006072 5 
006078 RTS %? SEXIT 
006076 RIND: OPEN 
006100 PTO OPEN 
006102 PTi OPEN 





‘SPECIAL BINARY COUNT PATTERN SUBROUTINE. EXITS WITH BIN CHAR IN Ri 
GTB IN: MOV PTO. PT1 




















01 3737 +PREVIOUS BIN CHAR TO PT1 
005 * 37 Con PT 
— oie 
005237 PT! 
042737 8177400.PT1 ‘MASK TO 8 BITS 
013737 PTI. PTO +SAVE BIN CHAR IN PTO 
013701 PTi.%1 BIN CHAR TO R1. 
000240 
000207 RTS %? s EXIT. 
-OCTAL TO ASC!1 CONVERT ROUTINE 
104007 NV: SAVREG +SAVE REGISTERS ON THE STACK 
01 3504 MOV 0(5)+, 24 ‘GET OCTAL 
aes nov (5)4. X1 ;GET — ADOR. 
2502 MOV (5)4, %2 4 ONVERT COUNT. 
— ROD %2, %1 VELOP ADDR TO STORE 1ST CHAR. 
0403 OACNVA: MOV 24, XI 
BIC #177770, %3 ‘ISOLATE LERST SIGNIFICANT DIGIT. 
ADD e%3 ‘CONVERT DIGIT TO ASCII. 
110941 MOVE e=(1) STORE ASCII CHARACTER. 
BIC XM 
ROR 
ROR x4 
ROR %4 
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1499 006214 005302 DEC %2 *+DONE ALL DIGITS? 
500 006216 BNE OACNVA +BRANCH IF NOT DONE. 
RSTREG +RESTORE THE REGISTERS 
RTS %5 DONE. EXIT. 

















1$: MOVB (1)4, (2)4 

DEC %3 

BNE 1$ 

RSTREG 

Ts 45 

+SUBROUTINE TO TRANSMIT DATA SUBROUTINE CALLED BY 
+ JSR &.XMITO 
XMNITD: MOV 


ADDRESS IN CAT 
10N INTO BAR 


JSR CALL TO THE ROUTINE. 
AND CHECKED BY THIS ROUTINE. 














;GET CHARACTER COUNT 

‘GET ADORESS OF OUTPUT BUFFER 
;LORD OUTPUT BUFFER WITH DATA 
:GO0T ALL ORTA? 


+LORD TUMBLE TABLE POINTER 







zazzeee 
* 
se 
& 
a 
ae 















CLR = TUNTRS 
JSR -&, BROVE ; CLEAR 
; TRBLE 
rT ;SETUP INPUT 
173142 ts :SET THE GO 8 
173126 25: 81 T1S¢BITINeBI TI 
acsr CE IVER 
4 HARACTER 
173106 38: 481714481713, acsr: 
4$ BR 










n 
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006440 60 JMP 15$ ;GO EXIT 
173070 46: BIC #81715. acsR ;CLEAR TRANSMITTER READY FLAG 
TSTB ac sR ; TEST FOR CHARACTER READY 
173054 55. BIC a8 1T?, acsr ; CLEAR CHAR DOME BIT 
BMI +4 ; TEST FOR VALID ENTRY 
ERROR ;REPORT INVALID ENTRY 
MOVB (1). (294 ;MOVE CHAR FROM TUM. TAB. TO INPUT BUFFER 


;ROUTINE TO STORE RECEIVED PARITY BIT IN PARITY BIT BUFFER 
mov «1,5 ;GET ROTATE COUNT 















































; Y¥Y BIT 
BIT @B1T13. (1) ; RE PARITY BIT 
ne 6$ Aire iF | PARITY WAS ODD 
GO65 14 6$: JSR 5. RORPARBUF +ROTATE RECEIVED PARITY INTO PARITY BUFFER 
+ROUTINE TO TEST THAT ENTRY 1S FOR THE CORRECT LIME. 
006520 nov (1), a6TTDAT *GET TABLE ENTR 
Mes 24 001562 #160777.TTORT ;CLEAR ALL BUT LINE nunBER 
— 001563 LINE. TTORT41 > COMPARE LIME MUPBERS 
ass Zz 001570 *GET CORRECT LIME @ (x2) 
Oe SEO 001566 +GET LINE @ (X2) THAT FALSE DATA CANE IN ON 
Messe sERROR! DATA CANE IN ON A LINE THAT 
+PROGRAN WAS NOT TRANSMITTING ON 
Reseed sExXIT TEST 
Boe Sa2 7$: ⸗ 
Messe ;OF THE TABLE 
006570 
OS 7% 8$. ¢ 
GG6576 3 
Meet) , BEEN TRANSMITTED 
006610 ; EN TRANSNITTED 
Wesis NEXT CHARACTER 
; STER ZERO 
| 017102 96 
017246 
000014 7ROTATE PARITY BUFFER 
006764 #12. PLACES RIGHT 
001566 108: 
001570 
017245 ;MAVE ALL CMRRS. BEEN COMPARED 
001570 | ‘GET TRANSMITTED CHARACTER 
8* Bier 87° ——— 
006674 > COMPARE TRANS. & RC 
;ROUTINE TO COMPUTE AND CHECK PARITY 
006676 000010 116: MoV a8. .%3 ;GE 
006702 CLR sCLe 
006704 001566 12%: RORB RCVDAT *LOOK AT RECE} 





Cc 








: FE —— 
—— 5 


mua FETE (itteeeee 
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001566 
000001 
006764 












| 3 
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BCC 13% +BRANCH | 
con %0 
135: DEC %3 
BNE 12$ 
NOP i | 
sCONTAIN ALL 1'S. IF EVEN 
MOVB (2)+,RCVDAT 
v #1,%5 
JSR 5, RORPARBUF 
BCC 14 
TST x0 D OOD 
BNE 10$ ; iF COMPUTED & RE 
ERROR sERROR! COMPUTED <EVEN, 
BR 10$ ; CONTI 
14S: TST x0 + TEST FOR EVEN C 


10$ + BRANCH 
R 


155: 





! ST 
; REPOSITION STACK POINTER 
» SCOPE 


? 


+ROUTINE TO ROTATE PARITY BUFFER. 
RORPARBUF Loo PARO 


*DECREMENT ROTATE COUNT 






RTS 
PARITY BUFFER 
PARO: ## OPEN 


PARI: 
2: 









PAR OPEN 
PRR 3: OPEN 
PAR: OPEN 
PARS: OPEN 
PARE: OPEN 
; SUBROUTINE TO FORM LINE BIT POSITION WITH THE LINE @ IN LINE 
GTLI ING. ae —5 THE 





O6L INE. 20 





— — — 


Ree me I 
CZDMADO DAIIA LGC TST RACYI1 3OR(1052) 28-APR-78 13:48 PAGE 35 
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— 3 
002000 MOV 8RTO. KSTART *+GET ADDRESS OF FIRST TEST 
CLR RTNNO +CLEAR ROUTINE & 
JrP SRSET 
002000 PRGOR: MOV 8RTO. KSTART +GET ADORESS OF FIRST TEST 
CLR RTNNO ; CLEAR ROUTINE NUMBER 
JnP GE TROY AND START PROGRAM 
; S2UNRSEERESERASEEAESE LENE SEEN SEER SSSR SSSRSSS ESSE SSS48055225020500021 
RTO: 0 s+ROUTINE #0 x 
RT1 +ADOR OF NEXT ROUTINE. 4 
100. + ITERATION COUNT z 
RTOA +SCOPE ENTRY POINT. és 


X2X+1 
; » RERSAAAAAATLLLL38A85 yäyäöäXyÿ᷑ùLCTZAAEEISS——— 
AIE ABILITY TO REFERENCE CSR WITHOUT TRAPPING 
RTOR: MOV #15. O8ERR 















ooooou VEC =; SET UP ERROR TRAP. 
TST REFERENCE CSR 
000004 nov SERRVEC42, ARERRVEC ;RESET TINE OUT TRAP 
15: SUB #4. (6) SRESTORE PC TO WHERE THE ILLEGAL 
; REFERENCE OCCURED 
ERROR sERROR! ILLEGAL REFERENCE OCCURED 
RTI ;LOOP ILLEGAL REFERENCE INSTRUCTION 
Rd tt ASssBSMREASSSSSEASSESSESSSSESSSSSSRESSSESSSSSESISISERSSS 
RT2 ; ADOR : 
100. ON COUNT z 
oe | : 
BoP P Pop sepssitsotstisse tess sseiscesiterssrestsstseeeeteee steer rer rer tTis 
; TEST THAT CSR BITO CAN BE SET AND 
007210 000001 172324 RTi 
007216 000001 172316 
007226 
007230 
007232 000001 172302 15: 
007240 172276 
007246 ;CSR BITO FRILED To CLERR 
007250 2s: 
; 
007252 RT2: ‘ + ROUTINE 12 1 
3 Oras 00. rE —— * : 
007266 43 — ENTRY POINT. 2 





XsX+1 
; SESESASATTAAA TAT TAT TAA ATAALAAATTAAATATAAAATATALAALAVAAAIAWWIAAAA 


172562 aT. "ove Maiti ocee - Toit. 
172244 CnP #8171. aCSR Test TH THAT BiT1 IS SET 








_ 
= 
™N 


262 012777 
270 022777 








a — — — — 


K 3 
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CZDMAD. P 28-APR-78 13:4 


001402 BEQ 1$ +BRANCH IF SET 






















104001 ERROR ‘CSR BIT1 FAILED TO SET 
000407 BR 2$ 7OR AN ADO IT | ONAL BIT ALSO SET 
000002 172230 15: BIC #6171. aCSR ‘CLEAR BIT! 
172224 ate 3* TEST THAT BIT1 IS CLEAR 
25: Sroee ‘CSR BIT1 FAILED TO CLEAR 
BLPesrtrtsrsssss ss ssegys ¢ SESELLATATL LAS 592229554225242552% 
RT3: 3 ROUTINE @ 3 $ 
RT4 +ADOR OF NEXT ROUTINE. 4 
100. ; ITERATION C COUNT 1 
RTSA +SCOPE ENTRY POINT. 4 


X=X+1 
; Dnata ETT ttt SS Testis Stirs Ses S TTT ESS CESSES STET TEP ET TPT TT 
sTEST THAT CSR BIT2 CAN BE SET AND CLERRED 
3A: = MOV #8 1T2, aCSR 















172200 RT 
172172 #6172. aCSR 
i$ 
2$ 
000004 172156 15: #6 172. acSR + CLEAR 
172152 ecsRr ; TEST THAT BiT2 1S CLEAR 





CSR BIT2 FAILED TO CLEAR 





AILED TO SET 
TIONAL BIT ALSO SET 






+CSR BITS FAILED TO CLEAR 


23: SCOPE 
; eee 






RTS 2 
NEXT ROUTINE. 2 

TiON COUNT 3 

— Scone ENTRY POINT. t 


XsX¢4 
+ SESSSSSAAATA LAAT ALIA TATA AAT TTA TAVAAIAAAATAAAAANAAAAAWAAWWANIAAAAIAAT 


+ TEST THAT CSR BITS CAN BE SET ne Be 
012777 000040 172054 RTSA MOV 8617S. acsR 





i Maine i 


Cc 














CZDMADO DM11A LGC TST 
ZOMAD. P11 28-APR-78 13:4 





Sas EN 


000144 
007656 





000040 
172026 








ttt 30A (1052) 


172046 


172032 
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#6175. acSR 
i% 





2$ 
1$: BIC #68175, acsr 
ecsR TEST THAT BITS 1S CLEAR 
25: Scere +CSR BITS FAILED TO CLEAR 
; IAAL TLL ALATA LISTS TS LESSEE ääiääätR 
RT6: 6 +ROUTINE 8 6 £ 
RT? +ADOR OF NEXT ROUTINE. x 
100. + ITERATION COUNT x 
head +SCOPE ENTRY POINT. x 
; Bie ee tee TTS STS SS seis i sisi setts sess e est estS SST SST TERT TTT TT 
ay THAT CSR BIT6 CAN BE SET AND Eee 
RT6AR: MOV 86 1 T6. aCSR ; 176. 
r+ + Té. @cSR + TEST “gee! BiT6 IS SET 


TSR BiTé FRILED TO SET 
20R AN ADDITIONAL BIT ALSO SET 
; CLEAR BiT 


+ TEST THAT BIT6 1S CLEAR 
+CSR BIT6 FRILED TO CLEAR 




























2$ 
15: #8 1 T6. acSR 
ocsr 





*— iS SET 


2 FAI TO SET 
‘TIONAL SiT ALSO SET 
bit} iTi2 tS CLEAR 
sCSR BITIZ2 FAILED TO CLEAR 


; Xx 
RT10;: 


35 10N 
RT 108 TSCOPE ENTRY POINT. 
XEXEEXVEEEEEESSSSSSS—— 
;TEST THAT CSR BIT13 CAN BE SET AND CLEARED 


— — — 


SEQ 0037 


eee a — 
— ee 
— — — — — — 
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171604 


171554 
001566 


ae 


an 





Ri 








ö — — — — ——, 
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G20000 171656 RTI0A: MOV 861713. aCSR 
020000 171650 CMP ag) cis. aR ts 1S SET 
AILED TO SET 
2% 1ONAL BIT ALSO SET 
020000 171634 15: @61T13.acSR ‘CL 
171630 ecsr + TEST THAT BIT13 IS CLEAR 





os SCOPE +CSR BITI3 FAILED TO CLEAR 
A tS | Rae 7-7 he 





RT12 : ADOR NEXT ROUT INE. Es 
100. + ITERATION COUNT z 
RTIiA +SCOPE ENTRY POINT. £ 


X2X+4 
é etter ä Stee s tet SSS eSeSOSSSSSSSSTESSSERT STE TT 
+ TEST THAT RESET & CLEAR INSTRUCTION CLEAR ALL R/U BITS IN THE CONTROL 


+ STATUS REG (CSR) 
RTI1A: MoV — ‘SET ALL R/U BITS IN THE CSR 















@CSR. RCVDAT 
1s ALL BITS 
DID NOT CLEAR ALL BITS 





RTIIA 


@CSR. RCVDAT 
2s 













LORD BINARY COUNT INTO BKCSR 
3 “concen OK 
DOD NIT COMPARE 


L00P 





6 1T1%. aSUR 


1$ ; 
* T,X! ; ¢C 
XHTDAT 


sere AND TEST 
KCSR. RCVDAT CLEARED 








NOT CLEAR ALL BITS 


OO eee a here [[ 
























N 3 
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CZDMAD. P11 Z28-APR-78 13:4 
BEQ 4§ CSR CLEARED 
ERROR 1 DID NOT CLEAR 
171064 BIT 8681714, aSUR 
BNE 3$ 
4$: MoV %1. XMTDAT 
177777 CnP XATDAT. a-1 
BEQ 5$ + GO 
INC XMTDAT ; poe reNT BINARY COUNT 
BR i +REPERT TEST 
010142 5$: SCOPE ; $C 
; qi pPeSSEEEUSaaaa suas aaasseessssessssasessssssaesrecesesssssssssss288081 
010144 RT13: i3 ROUTINE @ 13 £ 
0101%6 RT14 ; ADOR OF NEXT ROUTINE. * 
100. + ITERATION COUNT z 
an +SCOPE ENTRY POINT. i 


XeX+1 
;  SSSSAESSSESSSESESSSESSERSRERSESSSSSSSSSSSSESSSESSSSESSESSSESSSESSSESESES 


#10000, x2 
— 
XO, XMTDAT 


XATOAT. aBKCSR 
@BKCSR. RCVDAT 
RXATOAT. RCVDAT 
3$ 


; LORD RANDOM MUPBER INTO BKCSR 
+GET SKCSR DATA 
+ COMPARE 









= 171%. aSUR 
eBKCSR 
PRYCNT, aBKCSR 
2$ 

%2 


i$ 
‘ — 
+ TEST THAT RESET CLEARS ALL BREAK STATUS REGISTER BITS 
177777 171252 RTiWA: MOV @-1. @BKCSR 
001570 CLR XATOAT 
SRESET 
171240 001566 MOV me. RCVOAT 
BEQ i 
; Eirrciiiiiieiirrrerttetrrtt TTT Trt TTT TTT TTT 
RT15: | sROUTING @ 15 z 













22 S399 
& eee 
e 7853 





+ADOR OF NEXT ROUTINE. 2 












—— ö— — — — — — ——— ————— — —— — 
8 4 
5—— 0 ee LGC TST  MACY11 30A(1052) 28-APR-78 13:48 PAGE 4O SEQ 0040 
CZDMAD. P 28-APR-78 13: 44 
010322 000012 10. + ITERATION COUNT z 
010324 01 aoare RT15A +SCOPE ENTRY POINT. a 


X2X+1 
; bent n errr Sse SS Sse Sess S SESS S STE STS TT TTT TTT TTT 


‘TEST THAT A BINARY COUNT CAN BE LOADED INTO A CLZ°® BASREG AND THAT 
3A BINARY a —8 CLEARED. 


































010326 001570 RTiSA: C 
010332 013777 001570 171210 16: MoV +;LOAD BINPRY COUNT INTO BASREG 
O1080 017737 171204 001566 nov ;GET BASREG DATA 
01086 001570 001566 CMP : COMPARE DATA 
010364 BEQ 3 BRANCH IF DATA COMPARES 
010366 + ERROR! DATA DID NOT COMPARE 
010360 O40000 170614 #61714, aSWR ;SCOPE LOOP? 
010366 i$ BRANCH 1F SCOPE LOOP 
010370 001570 2s: XMTDAT. %1 ;SAVE BINARY COUNT 
O1037% 001570 XMNTDAT 
010800 171144 3$ SB ESREG 
010808 171140 001566 @BASREG. RCVDAT 
$ 7BRANCH IF BKCSR CLEARED 
‘ERROR! BKCSR DID NOT CLEAR 
040000 170556 BIT 881714, aSWR +SCOPE LOOP? 
BNE 3$ ; BRANCH iF SCOPE LOOP 
061570 98: nov %1. XMTDAT ;GET BINARY COUNT 
001570 177000 CMP XMTDAT. #177000 ;ALL NUBERS BEEN LOADED 
BEQ TO EXIT 
001571 INCB XMTDAT +1 
BR 18 
5S: SCOPE 
+ SERSAAAAAIAAAIIAIIA813 2775 ——— 
RTi6: 16 + ROUT !NE # t6 
RT17 : 
100. z 
RT1i6A x 
X=eX+1 


; SESTELATL ATT LALATTIAIAAT LAL LIAS IVLIAVIIIAATLATLITI288822722272771731 














;TEST THAT THAT RANDON NUMBERS CAN BE LOADED INTO THE BASE REGISTER 
RTIGA: MOV 3GET RANDOM @COUNTER 
010%66 1$: NOV ; 
010500 ; 
010510 35 2$ ; 
010516 017737 7 
—53 
010635 104011 : 
010636 032777 3s: #81714, aSUR ; SCOPE 
$16 y ;BRANCH IF NO LOOP ON ERROR 
01 05N6 905077 6 @BASREG 
3777 002104 170770 PRVCNT, aBASREG PREVIOUS CONTENTS 
010560 000753 2$ ie AT TEST 
si * i ee say eH Teste 
010566 104006 55: ; SCOPE 





CZDMADO OM11A LGC TST 
Z8-APR-78 1 


CZ2DhAD. P11 


EES 





2222222222222 


fn Baa Ef 











pet posh 
or 











001544 
001400 
000001 


001570 
001566 


001570 








c 4 
gh SOR(1052) 28-APR-78 13:48 PAGE 41 


170736 


170614 


— a ee — ö— — — — — — 


———e5e éy!y5—£Ñ˖òà⏑⏑ ST TT ESET TTT TTT 
RT1?: 17 +ROUTINE & a 


RT20 +ADOR OF NEXT ROUTINE. 1 
100. + ITERATION COUNT é 
RT17A ‘SCOPE ENTRY POINT. g 


X=X+1 
Diente itt sis sists sis SiSe TSS ESTEE ET ESET TT TTT TTT 
sTEST THAT ALL BAR BITS CAN BE INDIVIDUALLY SET AND CLEARED 
TIi7A: MOV i /GET BAR 





















% ; 
MoV SCAT, @BASREG + INITIALIZE BASE REGISTER 
nov #1,%0 +GET BIT TESTER 
1$: BIS x0, (1) +SET BAR BIT 
CnP x0, (1) + TEST THAT OMLY THE PROPER BAR BIT SET 
BNE 3$ ; 
BIC x0, (1) ; 
(1) 3 LEARED 
: AILED TO CLEAR 
i$ 
23: 
3$: x0, XMTDAT 
us: (1). RCVDRT 
5S: — 
+ SSSRISAAAALAAALAAA8a 322s 
RT20: 
Pe 333 
+ TEST THAT RESET CLEARS ALL BAR BITS 
RT20A: XATORT 





CLR 
Bis 







8-1. aBRAR *SET ALL BAR BITS 
sRESET 
seme, ROWORT ‘GET 





$ * 
28 
1 BIS 1, aoe 
ca X 






Q 
Enon 10 NOT CLEAR 


: OPE 
47 Sees | euneeeadbaabbeaibiabbee --\~1 a by pena ieee 


RT —33* Next ROUT INE t 
OR 3 tron couNtT + 
RT2iA ;SCOPE ENTRY POINT. 1 


XsX41 
+ SESSSAAASAAATSSAAASAAAA ALARA AAATAAALALATAT LLAAAAAAVAAANAAAAAANBAAWIIT 


SEQ 0041 
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SRSeGaUvNYENUMUNNDRUBRORSSSSSSURUE — —— 











010100 
170550 
010000 
010100 
170526 


010100 
171052 


000100 
170472 


010100 
170444 
010000 
010100 
170%22 


010100 
170746 





rps tne 
010000 






010100 
170316 





170554 
170542 
001570 
001566 


170512 


001570 
001566 


170450 
170436 


001570 
001566 





170344 
170332 
001570 
001566 


SS __ — — —— — —— — — — — [—— 
D Y 
28-APR-78 13:48 PAGE 42 SEQ 0042 


















sTEST THAT CSR RESPONDS PROPERLY TO BYTE COMMANDS 
RT21A: MOV #10100, acs *LOAD TEST NUMBER IN CSR 
CLRB acsRr ; CLEAR EVEN BYTE 
R eree. acser + TEST THAT ONLY EVEN BYTE CLEARCD 
Vv #10100, MITDAT ; LORD CORRECT RESULT 
Vv @CSR. RCVWDAT ‘GET ACTUAL RESULT 
ERROR 1 sERROR! EVEN BYTE INSTRUCTION FAILED 
8 2$ ‘GO TO SCOPE 
1$: Vv #10100. acsR 
CLRB @. CSR 
BEQ 2$ 
Vv #00100, M1TDAT 
MOV @CSR. RCVDAT SULT 
ERROR1 ODD BYTE INSTRUCTION FAILED 





» ERROR 
2s: SCOPE + SCOPE 
— Re aesseasssnnnnsscerrastesassssssseasssssesssssssrsssszs 


ROUTINE @ 22 
RT23 +ROOR OF NEXT ROUTINE. : 
100. + ITERATION COUNT a 
aT22A SCOPE ENTRY POINT. z 


X=X41 
; Delete — — ties tts t sees eeSSSSSSTS SETTER TTT TTT 
‘TEST THAT BAR RESPONDS PROPERLY TO BYTE CormmNDS 
RT22AR: MOV BAR + LORD 

















#10100, TEST i“ 8 IN BAR 
OB RR ; CLEAR EVEN 
+ TEST THAT omy EVEN BYTE CLEARED 





ee, CORRECT oe 
sERROR! EVEN BYTE INSTRUCTION FAILED 
60 TO ; ae 


- LORD vest veneer N BRR 
+ TEST ONLY 000 BYTE CLEARED 





X+ 
; , 


+ TEST THAT BKCSR RE PROPERLY TO BYTE C 
RTZ23AR: MOV 101 CSR ee 
RB 38 BK Ch 







OMMANOS 
ST NUMBER IN BKCSR 
EVEN BYTE 





ChP e@BKCSR = ; TEST THAT ONLY EVEN BYTE CLEARED 
MOV 00, MITDAT 
MOV KCSR. RCVDAT 
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=] 
* 








83 
* 


012777 


2 
poe pens 





‘ 


Oo 
= 
= 
o 
—X 


Ah 30A (1052) 





170302 


001570 
001566 


170246 
170224 
170216 
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Z28-APR-78 

ERROR 1 + ERROR! EVEN BYTE INSTRUCTION FAILED 
BR 2$ +GO TO SC 

1$: Vv #10100, aBKCSR LOAD TEST NUMBER | N BKCSR 
abee $ OACSR + TEST THAT ONLY 000 BYTE CLEARED 
MoV #00100, X1TDAT +LOAD CORRECT RESULT 
MOV @CSR. RCVDAT LORD AC 
ERROR 1 F ERROR ! ODD BYTE INSTRUCTION FAILED 


23: SCOPE 
é SDR tittiortiirettisriictt it tterttr tt ttt ttt tht as 
RT24: 24 ;ROUTINE @ 2% 2 


* 








RT25 Hy OF NEXT ROUTINE. z 

100. ITERATION C z 

oe ; SCOPE ENTRY POINT. x 
; ; SUSATLATLAATT LATS äXſÿXſeeC)CMCVCCEE——— 
+TCST THAT OVER RUN BIT (CSR BIT13) CAUSES AN INTERRUPT WHEN SET 
RT24AR: MOV 815. @XMTINT LORD TRANSMITTER | rar” VECTOR 

MOV #61712. acsR ; SET TRANSHITTER IE 8 

BIS 861713. acsr +SET OVER RUN BIT 

9 @ePSu ENABLE | INTERRUPTS 

ERROR ERROR FOvERRIN FAILED TO CAUSE AN 





+ INTERRUPT, 


INTERRUPTED TO INCOR- 






OR I 
;RECT ADORE SS 


‘SCOPE ENTRY POINT. 
; SERRRRAEEEEESSESSESaRaeaeaeaeeesseseseseseeseseeseeeeeeeeetseterastet 
‘TEST THAT THE OF11 INTERRUPTS AT THE CORRECT LEVEL 
RT25A: MOV SPRTY7, Ae 
—3331 55*7 — ee et VECTOR 
GPRTY4S. a8PSU ‘ALLOW INTERRUPTS ON LEVEL 5 & ABOVE 


4 te ted FRILED TO INTERRUPT 














33 *GO TO ExiT 
1S: (6)+4, (6)4 +RESET STACK POINTER 
XATLVL, a@PSW ‘LORD OM11 INTERRUPT LEVEL 
ng #2$. @XMTINT +LORD TRANSMITTER INTERRUPT VECTOR 
MOV #30000. acSR 
NOP 
BR 3$ +60 TO EXIT 
2S: ERROR s ERROR! —— INTERRUPTED ON HIGHER 
S PRIORITY LEVEL THAN SET FOR 


35: SCOPE 
— | «x ——— x 


RT27 sADDRESS OF NEXT TEST. is 





FY 
CZDMADO D114 LGC TST MACY11 30A(1052) 28-APR-78 13:48 PAGE uy 





CZDMAD. P Z8-APR-78 13: 44 
2167 011450 000144 
2168 011452 011454 
2169 000026 
170 
004622 
004622 
004622 
2195 011514 
004622 
004622 








100. + ITERATION COUNT J 
LTSTO + SCOPE ENTRY POINT a 


X=X+1 
; TRANSIT TT ER ee eee eas AESEEESASES EERE SESE SESE SEES SESE SSR ESEL ELE TE TE 
+ TRANSMITTER LINE TEST LINE O 
LTSTO: J 7 


5. XATTST +GO TEST TRANSMITTER LINE O 


Y=¥+1 
; PES RE EIST TESST Sit Sit stile te eeitsitsertssstisttsssett este ttt t 
RT2?: 27 OUTINE @& 27 x 


; 





RT30 ESS OF NEXT TEST. x 
100. ; ITERATION COUNT 1 
LTST1 +SCOPE ENTRY POINT i 


X=X+1 
; TRANSHITTOR Cane eee eee eases SABE ESSE SESS SESS ESSE SESS SESE SESS ASSL EST 


> TRANSMITTER LINE T 
LTST1: or awe 5. XATTST +GO TEST TRANSMITTER LINE 1 


Y=Y¥+1 
; Bi adel een äo0& 
RT 30: 30 OUTINE &@ 


; 





a 
RT31 + ADDRESS be NEXT TEST. * 
100 + ITERATION COUNT z 
LTST2 +SCOPE ENTRY POINT ¥ 


i 
+ SERSSATAAAAAAAAAA 223 —VVVVEE 
+ TRANSMITTER LINE TEST LINE 2 


LTST2: J “Lines 5. XATTST GO TEST TRANSMITTER LINE 2 


Ys¥41 
Besos eset eset sess seeders ses sy 
RT3i: 31 





RT 

100. x 
LTST3 ‘SCOPE ENTRY POINT a 
XzX+1 


SESTATIATTLITTIITTIAIAIATAIIIIIATTII72 2222722 


+ — —— ——— 
TRANSMITTER LINE TEST LINE 3 
S. RATTST *+GO TEST TRANSMITTER LINE 3 


LTST3: ISR 
LINES 


YsY+1 
RTS ee ae sasEAARASASSRARSARSRESERRSERESERREELINTA IAT TTTT AT 





sROUTINE @ % 

RT33 s;ADORESS OF NEXT TEST. x 
100. ; ITERATION * 
LTSTu SCOPE ENTRY POINT z 
SRSIARAAAAAAATLALTLTALATAVAIVTAAANAIAWNIAWAIINAAAWAAAE 





SERTISAAAASAAAAAA ATT 
; TRANSMITTER LINE TEST LINE 4 
LTST4: JSR 5, XMTTST +GO TEST TRANSMITTER LINE & 


Ye ¥+1 
; ; SESSSSSRESSAA SATA TARAS XäſJüYLäXXEXXEE 
RT33: 33 +ROUTINE * 


13 
‘ADDRESS OF NEXT TEST. x 
100. > ITERATION COUNT 4 


BRS 


2227 


SSSSERSESLULULUL LULL LULL PEEP EE EEEE SSS SEE RESIST 


011562 
011566 


011570 
011572 
011574 
011576 


011600 
011604 


011606 
011610 
011612 
011614 


011616 
011622 





011562 
000033 


eh 30A (1052) 


13:4 


004622 


004622 


004622 


004622 
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Steet +SCOPE ENTRY POINT a 
; TRS eae TEASE MEER IESE ALES SESE SSER ESSE SERS SSSA AESA ESS ETE TEESE EEE 
; MITTER LINE TEST LINE 

5, XATTST +GO TEST TRANSMITTER LINE 5 

So 

= 
, äääyjjſ 5555500550084222241 
RT34: 3y +ROUTINE @ 3% x 

RT35 +ADDRESS OF NEXT TEST. * 

100 + ITERATION COUNT z 

4. Scop ENTRY POINT i 


X=X+1 
; TRANSL TTOR Cine eee ere es tEESESER ESE S SESESESE SESS ESSE SEES SESS ESSEAIY 


+ TRANSMITTER LINE T 
LTSTé6: ae 5, XMTT +GO TEST TRANSMITTER LINE 6 


Y=¥+1 
; 5885259200950955595052502200221 
RIIS: 35 ;ROUTINE @ 35 é 





RT36 a 
100. * 
LTST7 + SCOPE ENTRY POINT x 


XeX+1 
+ SELSAAAATATIAIT 32 SESIAALIATTS ATLASES AISI 8883 2292 5522552522272755122 
wee LINE Test LINE 7 
LTST? JSR > 5. XATTST +GO TEST TRANSMITTER LINE 7 





Li 
ys¥¢ 
+ S3RS8AAAIIIzz 
RT 36: 36 
RT37 
100. 10n € 
LTSTio0 sSCOPE ENTRY POINT 







X2X+1 
+ SERSLTTTTAT ATS LATTA LS TALES IT IT2888 228222882222 222222221% 
ITTER LINE TEST LINE 10 
5. XATTST 


> TRANSHI 
LTST10: Tae P GO TEST TRANSMITTER LINE 10 





TEST PERE gee ea aRERERERERER SEER RET EET EIEN ETT 
time — LIME 1 
GO TEST TRANSHITTER LINE 11 


¥s¥41 
; RESSSSAASAAASAAA AAA AAA ATALTLAAATAAAATLAAAATTAATAALAYAAANAWNAAAIIN? 
RTHO: 40 ; ROUT! — * — 
re Rat a 
:SCOPE ENTRY POINT 





oO 06 04 4 


100. 
LTST12 


CZ2DMADO OM11A LGC TST 


CZDMAD. P 


BBS 3 


— La Ceceeeeeeer ert ereeer cree erent er rest 


Pil 


011706 
011712 


011714% 
011716 


tz 


Zz333 se 
JSF 






4 he 30A (1052) 
Z28-APR-78 13:4 


004622 


004622 


004622 


004622 


H 4 
28-APR-78 13:48 PAGE 46 SEQ 0046 


X=X+1 
SLILLILILI PTET OTT ese Seer eases sis eeseeses teste st SST ST ETT TET TTT TT 
+ TRANSMITTER LINE TEST LINE 12 
LTST12: JSR 5, XMNTTST +GO TEST TRANSMITTER LINE 12 


Y=Y¥+1 
ESAS SALA ALLA ATLASES SAAS SSSS SSS SESS ST 8884 480458055008222 
RT41: 44 sROUTINE @ 41 z 





RT42 +ADORESS OF NEXT TEST. A 
100. + ITERATION COUNT £ 
LTST13 SCOPE ENTRY POINT z 


XeX+1 
; TRANSMITTER Cine tee eae eat saa SEES ESE SEES EASES SSS SESS SESE SEES SSIS EES 


+ TRANSMITTER LINE TEST L 
LTST13: Piers 5, XMTTST +GO TEST TRANSMITTER LINE 13 


— — — — — — 
— — — — ——— — — — 


Y2Y¥+i 
V 7 eapeeaneaenanaaaanienaen 










ROUTINE @ & 
RT43 +ADORESS OF NEXT TEST. z 
100. + ITERATION COUNT £ 
LTST14 +SCOPE ENTRY POINT 1 


X=X+1 
BILLPPsesPses sess ses sss sss: 
‘eee LINE TEST LINE 1 
LTST14: JSR 5. XATTST 

Anti 






;SESESSSSSESSESES LIES SESE SEES sea Tea EEEE E88 
+GO TEST TRANSMITTER LINE 14% 





— + oe ae 
ates. 43 ;ROUTINE 8 4 
100. TERT Pent iON 
LTST1S ;SCOPE ENTRY POINT 


SERTLSLTSTTAATLIATTSI58220239527722222722 


+ SESSASIVIAEIAIAT ATI 372223 
; TRANSHI ITTER LINE TEST LINE 156 
5, XATTST +60 TEST TRANSMITTER LINE 15 


LTSTIS: 9 
—— 


; Susnsusunsseazasnsnetsmnstesaty 
RT4S 
100. 
LTST16 sSCOPE ENTRY POINT 









X+1 
SESSLILARALTAALATALAAATATAAAAAATALALATATAAAAAAAAAAAATALAIIAT 
ITTER LINE TEST LINE 16 
5, XATTST z260 TEST TRANSMITTER LINE 16 


Ye Lb4. 
; SSSTSSELETSSSSAS LAAT SALT L LATA AAT AAA LATA ATTA TAA TATA ALATA IAAT IIIIIt 
RT45: 49 ROUTINE @ & 
ih ‘ADDRESS OF rfl TEST. 


100. ; 1 TER ATi 
LTST17 : SCOPE ENTRY POINT 
XeX+1 





oO 06 06 4 


 % 
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2335 ; TRANSALT TER ee eee eae TAS MERE SAES SEES SSSESSES ESE SINS SESS EAELELEL TED 
2336 ‘TRANSMITTER LINE TEST LINE 17 
2337 011776 004537 004622 LTST17: JSR 5, XATTST +GO TEST TRANSMITTER LINE 17 

012002 000026 LINE17 
2339 000020 Y=Y+1 
2340 000000 Y=0 
2341 000000 A=0 
2342 ; SESRELEREAASLLLTL AAT AALS ALS ASS SSS STLS SESS SSS 58850005052409220942222 
2343 012004 O000%6 RT46: 46 — 8 46 x 
234% 012006 012022 RT47 ESS OF NEXT TEST x 
2345 012010 000144 100. ; ITERATION COUNT 3 
2346 012012 012014 RCVO +SCOPE ENTRY POINT £ 
2347 000046 X=X+1 
2348 Pippodtonrertecseee STEEP SSPPS STS Sees ste Sse esSESSSOESST ESSE T ET TTT TTT 
2549 ‘RECEIVER LINE TEST LINE O 
2350 01201% 004537 005034 RCVO: JSR 5. RCVTST +GO TEST RECEIVER LINE O 
2351 012020 000000 LINEO 
2352 000001 Y2Y+1 
2353 ; bain tae e epee eDE Liisi testi isssetssttssttsttteres ert eet 
235% 012022 000047 RT4?: 47 ROUTINE & 47 i 
2355 012024 012040 RTSO sADORESS OF NEXT TEST a 
2356 012026 000144 100. > ITERATION C x 
2357 012030 012032 RCV1 + SCOPE ENTRY POINT x 
2358 000047 XsX+1 
2359 ss isees sees sess sees sees sete e sete SSS ESSE TT STP ESTP TT 
2360 — LINE TEST LINE 1 
2361 012032 004537 005034 RCVI JSR 5. RCVTST +G0 TEST RECEIVER LINE 1 
2362 012036 0600002 LINE! 
2363 000002 
2364 
2365 012040 
2366 012042 012056 1 
2367 012084 000144 100. ITERATION COUNT x 
2368 012046 012050 RCV2 SCOPE ENTRY POINT 2 
2369 X2X+1 
2370 Ppponit eens enti eeteL sete tests stes ses estessessseessee sees tT eet eT Tt 
2371 ‘RECEIVER LINE TEST LINE 2 
2372 004537 005034 RCV2; JSR 5. RCVTST +60 TEST RECEIVER LINE 2 
2373 000004 mer 
2374 000CS3 
2375 ———E— —— 
2376 012056 000051 RT51: 51 sy 
2377 012060 012074 RT52 * 
2378 012062 000144 100, : OUNT z 
2379 012064 012066 RCV3 SCOPE ENTRY POINT x 
2380 000051 XeX+1 
2381 SIRTLTAATALTAATAATTARATATATAAATALARAAAVARIAAAAAAAIT 
2382 : RECEIVER LINE TEST A. 3 
2383 012066 004537 RCV3: JSR o RCVTST GO TEST RECEIVER LINE 3 
2384 012072 000006 LINES 
2385 000004 ys¥+1 
2386 ; SESESSTES TALS LAST ALATA ALAA AAA TA LAA LARA LAAT AAATLATATAAIIALATT? 
2387 012074 R152; 62 ‘ROUTINE @ 8 
2388 012076 SS OF NEXT TEST z 
2389 012100 : I RA 4 % 
2390 612102 RCV4 ‘SCOPE ENTRY POINT x 





C2DMADO DM11A LGC TST 
CZDMAD. P11 


2391 
2393 


b3 


PEEK: 


2397 


2400 
2401 
02 


012104 
012110 


012112 


012144 











St 
13 





2 
nee 


nen 
one 
Nw 





MACY11 30A(1052) 
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005034 


005034 


+RECEI 
RCV4: 


J 4 
28-APR-78 13:48 PAGE 48 


X=X+1 
PrStT TIS TITTO STOP PTS SSeS e ese e sees esse sst ests sete StS SETS TESTS TTT TTT 
; VER LINE TEST LINE 4 
5,RCVTST +GO TEST RECEIVER LINE 4 


Y=Y¥+1 
¢ SESRESEAATAATALAATAAT LALA LTI 8858 88588855950800000900000004089902450714 
RTS3: 53 ;ROUTINE @ z 





RTS4 *ADDRESS OF NEXT TEST a 
100. + ITERATION COUNT z 
RCV5 +SCOPE ENTRY POINT 1 


X=X+1 
SLTC STITT TESTS PTT Sets Sess tess terse testes SseeSST ESET ES TTT TTT TT TTT 
sRECEIVER LINE TEST LINE 5 
RCVS: JSR 5. RCVTST +GO TEST RECEIVER LINE 5 


YsY+1 
— Vv00—— 






+ROUTINE & 
sADORESS OF NEXT TEST q 
100. + ITERATION COUNT z 
ih +SCOPE ENTRY POINT x 
BSS oo 8 8 8 | SESLETA ALLL ALIA S8ET 8883 285255222528222224242221 





NE 6 
sT +60 TEST RECEIVER LINE 6 








SBA I723 
sRECEIVER LINE TEST Li 
RC VE: a. 5. RCVT 





ITERATION COUNT : 
SCOPE ENTRY POINT i 
XEEXVCEEEE— 


‘GO TEST RECEIVER LINE 10 


1214 
nezzeeerecateretettateeezezziaaaeeeacacaaaateatcacaataca 





INE @ 
RT60 ; ss OF NEXT TEST 
100. ot ! OUNT 
RCVI1i1 +SCOPE ENTRY POINT 
XsX+1 





SEQ 0048 


K 
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2447 BISTIP PIPPI TEL ESSE Ee eo eretssetsssestsetss Stet eT TTT TTT TTT TTT TTT TTT TTT 
2448 ;RECEIVER LINE TEST LINE 11 
2449 004537 5, RCVTST 60 TEST RECEIVER LINE 11 
2450 000022 
2451 000012 YeY+1 
2452 MSS TT TITS D tt test tt 
2453 RT60: 60 : ROUT | £ 
2454 012236 RTO! ESS OF NEXT TEST i 
2455 000144 100. ; ITERATION COUNT * 
38* 012230 RCVi2 ;SCOPE ENTRY POINT z 
=X 
2458 BISTIP UCTS OCSeCeC See Ce ssrescstisstssitssttes sete eT eee TT TTT TTT TTT 
2459 ;RECEIVER LINE TEST LINE 1 
2460 004537 RCVi2: JSR 5, RCVTST ;GO TEST RECEIVER LINE 12 
2461 000024 L 
2462 00001 3 Ye¥41 
2463 ; 5255295308859883580950009900595099220005901 
2464 000061 RT61: 61 ;ROUTINE @ 61 z 
2465 012254 ;AOORESS OF NEXT TEST z 
2466 000144 100. ; ITERATION z 
2467 012246 RCV13 {SCOPE ENTRY POINT y 
2468 00006 1 —RXx 
2469 BLSVitiTe ssi ei ittetesstiesiesttsterese testes ett TTT TTT TTT Trey 
2470 ;RECEIVER LINE TEST LINE 13 
2471 RCVi3: JSR § RCVTST ;GO TEST RECEIVER LINE 13 
2472 NE 
2473 ysY+i 
2474 Rsistsisttertstcrsectir etter X 
2475 RT62: 62 : 
2876 RT63 : 
2477 100. 2 
2478 RCVIN OPE ENTRY POINT 2 
2479 XeXxel 
3382 
RECEIVER LIME TEST LINE 14 | 
RCVI4: 5, RCVTST ;G0 TEST RECEIVER LINE 1% 


















JSR 
LINES 



















2480 
2481 

282 

2483 

248% 000015 

2485 

2486 000063 : 
248? 012310 : 
2488 00014% : 
2485 012302 : 
33 ne — 
2493 012302 004537 RCVIE- isk J—— ao TEST RECEIVER LINE 15 

29% 012306 000032 

2495 000016 vayene 

20% jtaussenestsnsesnsestsmsszarseeesaneszazstszerezsnaresasasareraereiet2 
2497 012310 00006% RTeu:  6t ;ROUTINE @ : 
fe Ha Be ie bee 3 
2500 012316 012320 RCVIG [SCOPE ENTRY POINT : 
Ford —_— 


XeX+1 
+ SESSSELESAATAAATA LAAT IMEE 








. L 4Y 
CZDMADO DMIIA LGC TST MACY11 30A(1052) 28-APR-78 13:48 PAGE 50 
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2503 sRECEIVER LINE TEST LINE 16 
012320 004537 005034 RCVi6é: JSR 5. RCVTST +GO TEST RECEIVER LINE 16 

01232% O00034 Ud, 
274 

ASTI —— —xeqeoqeq22 . .... ... TTT TTT Ty 

RT6S5: 65 ;ROUTINE @ z 

RT66 +ADORESS OF NEXT TEST z 

100. + ITERATION COUNT z 

RCV17 ;SCOPE ENTRY POINT z 


X=X+1 
PTT T TTT TITEL T TTT T EPS ST SESS S SSeS Sti ssisssttseeseeest ESTES TTT TTT TT TTT 
ae a LINE TEST LINE 





JSR 5, RCVTST ;GO TEST RECEIVER LINE 17 
LINE17 
— 
s —— — —y2—y— y!— y2 5y—y5y2y5—5— 5—5— — eee.. — 
RT66: 66 ;ROUTINE & 66 t 
ne 3 
RT66A ;SCOPE ENTRY POINT. : 


X=2X+1 
BSI ST STi Pest esses essere trssetessseteesteTTTERT TP TTT TTT 







+ TEST THAT MEX BIT (CSR BIT 1%) SE 
>NON-EXISTANT MEMORY. THE 
:AND THAT 








ig R 3383888888 
— DDDDDDDooooo— — ————— 














J ; 
nov 3GET 

012702 nov 3GET 

Oldest 38 LORD 

005303 DEC ; TROLE 

001375 BNE ; ROORE 

012701 MOV 3GET 

012777 167134 MOV : LORD 

012822 062777 167112 25: Bis iSET 

012830 050177 gis 7START 

01283 013737 012444 nov 7LORD DELAY 

012882 108400 DELAY 7DELAY FOR 

012485 o00000 3s: OPEN 3TO RESPOND 

012886 017737 001566 mov 7GET BAR 
2558 012964 001406 ; ;THAT IT 
2560 328* ;ERRORIBAR BIT DID NOT CLEAR 
i fee ge: ‘ 

3 batons 167042 4S: ST NEX BIT IS SET 
oe J X BIT FAILED TO SET 
aes om 167 5s: ITTER READY FLAG 
* 012514 pot hd ere ;SET TRANSHITTER IE BIT 





Nn 4 4- 
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ot ee 177776 8 at p5u Allou INTERRUPTS 
012530 OOOS4O 177776 MoV SPRTY7, aBPSW ‘LOCK OUT INTERRUPTS 
012536 001570 MOV %1. XMTDAT +LOAD LINE THAT FAILED 
012542 001566 CLR RCVDAT 
012546 ERROR 1 +ERROR! NEX FAILED TO CAUSE INTERRUPT 
+ TYPEOUT SHOWS LINE # THAT FAILED 
012550 BR 7$ 60 TO SCOPE 
2552 166764 6$: CLR ecsrR 
2556 OOO34O 177776 MoV SPRTY7, apsu ‘LOCK OUT INTERRUPTS 
2564 8 i (6)+ ADJUST STACK PTR 


; SHIFT LINE BIT 
;00 









004%366 012602 








TEST THAT NEX *r SETS iF THE DMi1 
RT67A: MOV 6160000. aBRSREG SE 
84S. QBERRVEC 






ae 
eh 
4 
oom 





012654 
66672 


Re Ge Se Se Ss Be Ge Be 
a 
ond 





i 3 











Oil AER ERASE GE 


00 Creme = 


sa Br 
1hece ch a iF IT ts SET 
016730 





—— 
— 0 GN 2388 





012726 


Cc 


2621 


SEEEREPEREECERRRERREREESOUUUEY EDO P Pe eeP PEER ppp y ney 








012732 
012736 
012740 
8. 
012754 
—3* 
012770 
012776 
01 3000 
013002 
013010 
013018 
013016 
01 302% 
01 3026 
013030 
013032 
013034 
013036 
013040 


5 
—— 
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ee 


seer 


yi 


—* 
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006246 
166576 





HS ads 








166566 
001566 
001570 
016730 


013026 
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15: 4 5. @@XN ITD 
TST acsr 
BPL «8 
BIC #100000, aC SR 
TSTB acsr 
BPL 2$ 
MOV LINBIT, RCVDAT 
nov LING IT. MITDAT 
ERROR 1 
BR 4$ 

2s: ROD 82. LINE 
ASL LINBIT 
BCC i$ 
nov TIME1, 3S 
DELAY 


4382353 





~ 


225 ghareag 





om 
22 
* 
ted 





2332*7 
Ao- 


_=§ 
CAT, X14 


* XATDAT 
T. RCVOAT 
#61714. aSur 





+10. ores 
ACH LINE 
{WAIT FOR 10. one FERS 





‘TO BE 

‘TEST RECEIVER DOME FLAG 

A HAT ERROR OC BIT OF ACTIVE LIME 
OC CURE 


‘ERROR OATA WAS RECEIVED ON LINE INDICATED 


0 SC 
; SET UP NEXT LINE MUMBER 
+GET READY 





TERS 


TRANSH | 











TO TRANSMIT ON NEXT LINE 


+60 ares orang IME 


a thei is cae * @e 










—— 
RESULT 
ERROR ROORESS DID HoT 
T 






TABLE (LINE 0) 


— 1 CHAR. 











MIF SCOPE SWITCH IS SET 
EXIT 












wet 


BEE EPEELEETAT ASH aAGa tt 114444 


F 
hed BY oe 
esese 


2715 
6 





3 
a 


SS SRABREPSESERE 





01 3206 
013210 
013212 
013220 
013224 


013226 
013230 
013232 
013234 










* —— 
— 


ness ie 






He 
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006100 
100715 


aR | 


: 









os 
z3 
=6 


Hi 
eee 4 iF 






See 
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013514 





8 
13:48 PAGE 53 


Z28-APR-78 SEQ 0053 
ROL %0 
Brn 1$ 
3$: MoV SERRVEC+2, QHERRVEC RESTORE TIME OUT TRAP 
CLR OHERRVEC+2 


+ SCOPE 
; REO PETIT ETI ITTF SSS SESS SOS TES Oreo eres sos eesetSRCSE TS TTT TTT TTT TTT 
RT72: 72 ;ROUTINE @ z 


* 


173 OF NEXT ROUTINE. x 
. + ITERATION COUNT x 
RT72A +SCOPE ENTRY POINT. a 


X=X+1 
; eee at SESE S TiS e STS SS SESS S SST SST SES ESET ETE T TT 
‘TEST THAT DATA CAN BE TRANSMITTED FROM gt we CORE. 


‘LN O Is USED FOR THE TEST AND ONLY ONE WORD IS TRANSMITTED 
RT72A: CLR x0 ;CLEAR INDEX REGISTER 
;LORD CURRENT ADDRESS 





15: MOV AREACO), CAT E 
#5. aCSR +SET MAINT & GO BITS 
; ¢ Fe Ay eel 1 CHAR. 


*+WAIT FOR THE TRANSMITTER 
T AC 


8-1,WCT > SET 
oa, eee ; 






+TO TRANSMIT 









ERROR 1 
+ (CAT)-1 1S THE MEMORY LOCATION 
BR 6$ 
25: chp x0, #6 
3$ 


BEG 
TST (0)+ 
BR is 





85%. @#ERRVEC 


m1 

x1 

(0)+ 

%1, @PREACO) 
RAREACO), CAT 
#5. acsr 


4§: 





#- 1, WCT 
#LB1T0. aBAR 
8 





Be Be Be Be Be Be Be Be 


OO ee, — 


es — 
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2727 
2728 





BPL 7M 
CLR acsR 

TUMTAB.RCVDAT  ; 
@AREA(O), XMTDAT ; 
CARMSK.MAITDAT =; 
4 VDAT. XITDAT 







; , ROR NUMBER 
6$ 7 IN MEMORY LOCATION (SEE TABLE 
#6. @HERRVEC 


| 
| 
SCOPE sEXIT T 
LOCATIONS TRANSMITTED FROM TABLE 
0 ;FOR DATA IN FIRST 





*4K SEE THE LISTING 
; CONTENTS 











013532 ; OF THESE LOCATIONS (BYTE) 
0135 71S THE DATA TRANSMITTED 
013536 *CONTENTS =1 (CIF AVAILABLE) 
013540 ; = 2 ” 
013642 ; = 3 * 
013584 ; - 4% - 
01 3546 ; = 5 - 
013550 ; — 6 — 
013662 ; " 7 — 
013654 ; * 10 
01 F556 ; ⸗ 11 — 
013560 ; * 12 * 
013562 3 — 13 — 
013564 3 — 14 ” 
01 3566 ; - 15 = 
013570 173000 ; - 16 
; SESESTSASTATLALTA LALLA SEAL IISAIIATLATT ITI ITT 28I22T8822229227748211 
013572 R773: 73 sROUTINE & 73 z 
013574 RT74 7RDOR OF NEXT ROUTINE. z 
013576 10. +; 1TERATION COUNT ; x 
013600 RT73A +SCOPE ENTRY POINT. x 


XeX+i 
; — STA ATALATS ELTA ATLL LATLTIIIAIATT ITI 727 772 


ITTER CAN TRANSMIT 100. CHARACTERS BEFORE SETTING 


TEST THAT THE TRANS 
— READY BIT (CSR 15).AND CLEARING THE BAR BIT. 











. 
& 

© 
’ 











PEP SEREERREREETELLEEREEC EEE ET BEEPPE ER 


013602 005037 RT73A: CLR LINE 

013606 012777 i$: nov #1. oCSR +SET THE GO BIT 

013620 —3 SAL INE MITORT ;GET LINE NUMBER (X2) 
013626 @OxXni TO + TRANSMIT 100. CHARACTE 
013632 177634 ; ECIFIED BY LINE 
01363) 105777 25: SR 7 WA EIVER 
013640 100375 +TO CHARACTER 
013652 042777 #8177. aCcSR ‘CLEAR CHAR. DONE FLAG 
013660 RCVDAT + INCREMENT CHAR. RCVD COUNT 
aes 4A eee. sMAVE 100. CHARS. BEEN RCVD 
01 266% 777 acsr ‘TEST READY FLAG 

013670 100002 3$ *GO TEST BAR 





CZDMAC 
CZ0MAD 
2783 


SEL SEEE EEE. | L011 LP PEPPPERERE REESE 





O DOM11A 
. Pil 


013716 


—— 


222222 
aa? 





— 





— 
a 








eT 
Soe res 








LGC TST. MACY11 30A(1052) 
Z28-APR-78 13: 44 
104011 
00044 3 
023777 001564 165640 
001753 
U17737 165632 001570 
104011 
013730 
001566 
016730 
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28-APR-78 
ERROR 1 sERROR! READY BIT SET TOO SOON 
+ TYPEOQUT SHOWS HOW MANY CHARS WERE RECEIVED WHEN READY SET AND THE LINE # (x2) 
BR 84 +GO TO EXIT 
3$: CMP @8L INB IT. 2BAR iT iS SET 
BEQ 23 ; 
MoV @BAR, XMTDAT + GET s 
sER : CLEARED TO SOON 
+ TYPEOUT SHOWS THE BAR CONTENTS AND HOU MARS WERE RECEIVED WHEN BAR FAILED 
+LOCATION LINBIT HAS THE CORRECT BAR CONTENTS. 
BR sEXIT TEST 
4§: TIME14, 5$ +DELAY 1/4 CHARACTER TINE 
* zTo ALLOW TRANSMITTER TO FINISH 
ocsRr + TEST READY FLAG (SHOULD BE SET) 
60 TEST BAR 
sERROR! READY FLAG FAILED TO SET 
z260 TO EXIT 
6$: > TEST THAT BAR BIT IS CLEAR 
+GO TO 76 IF CLEAR 
sERROR! BAR BIT FAILED TO CLEAR 
7$: 





0. : 
. 
Ar tetttattettratteta rasgcrasa AIRIIRAITRRIITIIIIIIäIIIIIIXäIXIIIIIIIIXxXxIIäXää 


‘TEST THAT THE TUMBLE TABLE POINTER INCREMENTS PROPERLY AND 
‘RETURNS TO THE BEGINNING AFTER 64. CHARACTERS HAVE BEEN RECEIVED 
atm ° 1S USEO FOR THE TEST. 










sSET MAINT BIT & CLEAR GO BIT 


+ SET UP 


TO TRANSIT 65. CHARACTERS 
‘SET THe Go Bir 


3232825335332 
NED * 


Carats 





as 
38 





— 
⸗ 


SEQ 0055 
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EEE LLLU REELERRER LUT LELE URE Gch 











005711 
100402 
104011 
000417 
00502 
023727 
001 
005777 
105777 
005737 
100401 
10%001 
000000 
014212 
144 
014204 
004537 
000001 
000001 
014230 
014222 
000002 
000002 
014246 
000144 
01 
004537 
000004 
000003 


014264 
000144 
014256 


wen! 30A (1052) 
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001570 000100 


165370 
165362 
001600 


005456 





i oi ee — 
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Z28-APR-78 
TST (1) + TEST TT ENTRY FOR VALID 
ni $ +DATA ENTRY 
ERROR 1 ‘ERROR! NO VALID DATA ENTRY 
+ TYPEOQUT SHOWS @ OF CHARS. RCVD WHEN ERROR OCCURED 

BR 4% +GO TO SC 

3$: CLR (1)+ +CLEAR TT ENTRY 
oe ae ent. AN, +HAVE 64. CHARAC TERS BEEN RECEIVED 
TST acsr +WAIT FOR THE LAST CHARACTER 
BPL _ o§ +TO BE TRANSNITTED 
ae os ; TEST FOR DONE 
TST TUNTAB + TEST FIRST TT ENTRY 
BMI 4% +FOR VALI 
ERROR sERROR! POINTER DID NOT RETURN 

4$: = + SCOPE 


ö— — — — —— —————— 
SEQ 0056 


Y20 
: ET Pe tt esaannesenssssnesanesesesessSSusseessssssesssssssasssss 
RT75: 75 s+ROUTINE @ 75 





RT76 s+ADORESS OF NEXT TEST : 
100. + ITERATION COUNT 7 
Sones +SCOPE ENTRY POINT z 
; Ste tnpn neon here n eet Pe SESS TEP Esse S Sse Stee SST SSOSSESSESSSESTS TT ETT ETT 
BREAK TEST ON LINE 0. 
BRKO: JSR 5. BRKTST ‘= sh TEST 


Ys¥+1 
; ; SERETESSSLELEAATL AAAS TESS TELS Ss .ÆXſC(CI 
RT76: 76 > ROUT 

R177 ; 

100. 


Td 


n 
Xzn+1 










+ ange 

-BREAK TEST ON LINE 1. 

BRK1: JSR 
—950 





ON LINE 1 








g 
TEST z 
* 
= 


RESLILATAALALETATAAALALIA8 22529782822 22222727 224 
5. BRKTST +60 00 BREAK TEST 


Y+1 
sussunssssuenszazsxameseaesennseesesessazesanezateseeseesneezzzzzz122 






aT? 77 sROUTINE @ 77 
RT100 ; 
100. ; 













XeX+1 
s SESSSSSAAATAA LATER 8885 322 
; BREAK TEST ON LINE 2 
BRKZ: JSR 5. BRKTST 






RT101 
100. 
BRK3 





YsY¥+1 
; seid IT —— —— 
RT100: 100 *+ROUTINE @ 100 & 


SERTTAATRALTTAATAIATALATAAAIIAAATAAAWTWTAIT 
+60 ve BREAK TEST 
FON L 






CZDMADO DM11A 
. Pil 





05S 


— LLEELEE ETT CLEA EeReeeEEEeE errr er ener rT me 


014% 
014316 


014312 
014316 


LGC TST 
28-APR-78 13 











005456 


005456 








F § 
a hh 3OR(1052) 28-APR-78 13:48 PAGE 57 


X=X+1 
PILI LT ISTP POPP P PPE SE Shes eset sess tsessestssesesessest tet TT ETT TTT TTT TT 
+ BREAK TEST ON LINE 3. 
5, BRKTST +GO DO BREAK TEST 
+ON LINE 3 


Y=Y+1 
ALCL STITT T TTP T SSS S FETS STEEP ESOS Tosti sess osceeeeS TTS TTT ETT TTT TTT TT 
RT101: 101 sROUTINE @ x 








102 ; ESS OF MEXT TEST z 
100. : ITERATION COUNT z 
4 +SCOPE ENTRY POINT x 
= 
DRED Tee ae Ras tAEREEA SESE SESS SESSSESSSSSS SESS SERE SSS SESE ESET ESET ET 
JSR 5, BRKTST 60 CO BREAK TEST 
4 z LINE & 
= 
¢ — y 5yyy—y — — — — . ... ————————— 
RT102: 102 sROUTINE @ 1 z 
*ADORESS OF NEXT TEST z 
100. + ITERATION COUNT z 
aed ;SCOPE ENTRY POINT z 
= 
Beet TSS TESS ose ES sts t esses sis e serie tesessessee ett STS TTT TT TTT tts 
>BREAK TEST ON LINE 5. 
JSR 5. BRKTST 
LeITS 
YzY¥+1 
SS8SESIIAIAIAAAA As 
RT103: 103 
oo 





Bes eetrsesersesergss ogee gs 
+BREAK TEST ON LINE 6. 
BRK: JSR TST 




























LBITG 
Y2Y¥4i 
, SESSESERASTAI TAL — — — 2 5eqee 3 ’ !-tCE —— 
RTiO4: 10% ; 108 z 
RT105 z 
; OUNT z 
—— ‘SCOPE ENTRY POINT z 
+ SERESELAAALTATSAAAATT LATA LTAL AAS LETITIA IAAAAATAAWAAWANANANAWTT? 
;BREAK TEST ON LINE 7. 
BRK?: JSR 5. BRKTST 260 0O BREAK TEST 
eens 30N LINE 7? 
= 
; SELTELSAATALAAATALAAAATTATAAAAAAAATATAAARATALANALAAAAAAAAAAAAAWAITAT? 
RT105: 106 sROUTINE @ 105 z 
RT106 SS OF NEXT TEST * 
100. ; 1TERAT z 
BRKIO +SCOPE ENTRY POINT z 
X=X+1 


' 
— — 
— — — — — — — — — — 


CZDMADO OM11A LGC TST 
CZDMAD. P11 


2951 
2952 


abies REEL LULL SEREEPEREELS ISTE EEEPeC CC — 


004537 
000400 
000011 





nh 30A (1052) 
28-APR-78 13:4 


005456 


005456 


005456 


— ö ¶ —————— — ———— ———— [ 
615 
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; BREA eee a eae ESESSEESSRERSERSRSSS SASS SERS SSSA SESSLER SESE AES EEE Es 
REAK TEST ON LINE 10. 


BRIO: JSR 5, BRKTST ;GO DO BREAK TEST 
LBIT! 30N LIME 10 


Y=¥+1 
; SALLI LALA ASS LASS SESS SESSA , yy. 84888 24005058442822% 
RT106: 106 OUT! * 





RT107 +ADORESS OF NEXT TEST x 
100. + ITERATION COUNT 1 
—MM +SCOPE ENTRY POINT x 


X=X+1 
; Prtpnee pee eP TITLES SPP PSST SSPE Sse esse e sete esteSSSESSSES ST ESTEE TTT TTT 
BREAK TEST ON LINE 11. 
BRK11: JSR 5, BRKTST 60 DO BREAK TEST 

LBIT11 ;ON LINE 11 


? 





Y=Y+1 
; XESRESSSTLESTL ATA LAT LATS AALS SESS SSS SELES S355 24502542595505555202221 
RT107: 107 OUTINE & 107 S 


; 












T110 +ADDRESS OF NEXT TEST z 
100. ; ITERATION COUNT z 
mat +SCOPE ENTRY POINT z 
= 
; BREAK. Leet ae eae se tSERESES SESS EER ESESSSISSERES SEES SEES ESSESESE ESE TIE 
sBREAK TEST ON LINE 12. 
BRKi2: JSR 5. BRKTST 360 DO BREAK TEST 
—— 7ON LINE 12 
= 
— tenet eet —.. 
RT110: a, > ROUT INE # 110 


s SESSRAILAILA ALITA Tez zk 
> BREAK TEST ON — 13. 
ORK13: JSR T 

LBITIZ 





SESELESTLATTT ALATA SAAT ALTALALT AAT AAAAL ATA LAAT LATA LIAT IIIT 
| BREAK TEST ON LINE 14. 
BRK1I4: tots . 5. BRKTST 





YsV¥+1 
s SESSSSATLALT AAA LARA AALALT LAAT AT ATAASAALALAAAAATAANAAAAWAAANAAAAY 
RT112; 112 *8 INE @ 112 z 

a3 OF NEXT TEST $ 
i ; (TERA C ca 
BRKI5 ‘SCOPE ENTRY POINT x 


XsX+1 
+ SESEETTAAAAAT SATA ODIDLVVVEZEECEECEEE 





SEQ 0058 


aa 
| CZDMADO DMI1A LGC TST nacyit 30A(1052) 28-APR-78 13:48 PAGE 59 
CZ2DMAD. P11 


28-APR-78 13: 44 
3007 
3008 014472 004537 O05456 BRK15 JSR 5, BRKTST +GO DO BREAK TEST 
3009 014476 020000 LBITIS ,0N LINE 15 
3010 000016 Y=Y+1 
3011 MEST T ISITE TT TESTS FFP S ESET ST EST ESS S ES ir sstsssasteesS ESTEE TERT TEST TTT TTT 
3012 014500 000113 RT113: 113 sROUTINE @ 113 a 
3013 014502 014516 ; ADDRESS OF NEXT TEST 1 
301% 014504 144 100. ; ITERATION COUNT 1 
= 014506 mete ae ;SCOPE ENTRY POINT £ 
= 
3017 Bee TTT TTT TEST FTES T ESSE SESS Sree testtsseesteeseE ESET TTT TTT TTT 
3018 ;BREAK TEST ON LINE 16. 
3019 014510 004537 oO05456 BRKi6: JSR 5. BRKTST 60 DO BREAK TEST | 
3020 014514 QO40000 LBITIG ;ON LINE 16 
3021 000017 YeY+1 
3022 MECC TERT TTT TTS TSP PS TRESS Sis e ere e ete sesstsseseeseeS TESTE TTT TTT TTT ty 
3023 014516 000114 RT114%: 114% sROUTINE @ 11% z 
302% 0149520 014534 sADORESS OF NEXT TEST 1 
3025 014522 000144 1 ; 1 TERATI z 
3026 014524 014526 BRK17 +SCOPE ENTRY POINT 1 
3027 000114 XeX+1 
3028 Pppponnte ep ep rete EES SS TESS Stes estes tse ss eSeeSSSSSSTESSSTSS ETE TTT TTT 
3029 >BREAK TEST ON LINE 17. 
3030 005456 BRKi7: JSR 5. BRKTST +60 DO BREAK TEST 
3031 BiTi 20N LINE 17 
3032 Y=Y+1 
3033 0 
3034 
3035 be 
3036 RT115 
3037 
3038 
3039 
3040 
3041 72 SERIAL LATA LATTA TTLLALT 822822 22822282 099827932327111 
3042 -OATA TEST 100 CMRRACTERS LINEO 
3043 006312 DATO: JSR 5. DATTST ; 
3044 LINEO 
3045 
3046 
3047 
304s 
3049 
3050 DAT1 
3051 XsX+1 
3052 Pe SESTATTILASATALAATAT AAT AAALLAAAALIAITIAIAAAINWAAAAAAWALAYAAAAAWATTT 
3053 ;DATA TEST 100 CHARACTERS LINE! 
3054 006312 DATI1: JSR 5. DATTST 60 RUN OATA TEST 
3055 — a 3ON LINE! 
304 2 
3067 F SESSLATEAATAAAALAAATA LAAT AAT AAT AAAS AATAAAAAAALAALAAAAAANAAAAANAYAAAAWAT? 
3063 RT117: 117 sROUTINE 8117 t 
3059 RT120 ; OF NEXT TEST 
3060 100. : TTERATION COUNT 
3061 DAT2 + SCOPE ENTRY POINT 
3062 XsX+1 





BREAK TEST ON LINE 15. 








































a ee ö— — — — — — 


15 
3380 OM11A LGC TST mACY 1 30A(1052) 28-APR-78 13:48 PAGE 60 SEQ 0060 
CZDMAD. P11 28-APR-78 13:4 




















3063 Pst HSL TTT ITT TTS PPT SSS S SSS e etre sis es sees eseste este S ESTE TST TT TT TT TTT tty 
3064 DATA TEST 100 CHARACTERS LINE2 

3065 014600 004537 006312 DAT2: JSR 5. DATTST +GO RUN DATA TEST 

3066 014604 000004 L INEZ ON LINEZ 

3067 000003 Y=Y¥+1 

3068 6 RERERSERESALATLL ALLL ääjj——— 
3069 014606 000120 RT120: 120 + ROUT I NE x 
3070 014610 014624 RT121 ESS OF NEXT TEST a 
3071 014612 000144 100. ; ITERATION On C 1 
3072 014614 014616 DATS +SCOPE ENTRY POINT ca 
3073 000120 X=X+1 

3074 + SESRSASLELAA TIAL LSS SALTS LESS S52 ä ä iüÿTCZEEECRVEESS——— 
3075 DATA TEST 100 CHARACTERS LINES 

3076 014616 004537 006312 DATS: JSR 5, DATTST +60 1" DATA TEST 

3077 014622 o000006 LINES +ON LINES 

3078 000004 Ys¥1 

3079 - hss 5245 84555053000500082000220221 
3080 014624 000121 RT121: 121 —* #121 v 
3081 014626 014642 RT122 OF a 
3082 014630 000144 i z 
3083 0146352 014634 £ 
3084 000121 X=X+1 

3085 Peps LTS TT Ei t sist sie settee i tress irs tsrststseessee ee Stet TSTET TTT TTT Tritt 
3086 sDATA TEST 100 CHARACTERS LINES 

3087 014634 004537 006312 5. DAT 

3088 000010 

3089 o0000s 

3090 SESTAITTAIILLI82 2252223 
3091 O14%6%2 000122 a 
3092 014644 014660 x 
3093 014646 000144 z 
3098 014650 014652 DATS 1 
3095 000122 

3096 Bess ees esessrsteseg ese sess ees gc ea aN ——— 
3097 ;DATA TEST 100 ree LINES 

3098 DATS: JSR 5. DATTST 

3099 INES 

3100 

3101 

3102 

3103 

3104 

3106 


SONS SRRSSESRRAER TERESA ALATA TTT 


‘DATA Te TERS LINEG 
OATE: a Be ORTTST ‘GO RUN DATA TEST 
3ON LINEG 


eh... — 


— ie —— OF nr TEST * 







t 
+ SCOPE ENTRY Pot POINT * 


Ke Xe +1 
+ SESTSSSEAARAT TATA ATA LATA AAA ATAA TAA ATAAAAAAAATARAAAANARAAALANAAANAVAANAAAAAAT 





- — — 
— — — — — 

— — — — — — 

— — — —— — 


C 





. J 5 
CZDMADO OM11A LGC TST MACY11 30A(1052) 28-APR-78 13:48 PAGE bi 
ZDMAD. P1 4 


. Pil Z8-APR-78 13: 44 


3 014706 004537 006312 
3121 014712 000016 


312% 014714 


006312 


006312 


006312 


006312 





ö— — — — — — — 

DATA TEST 100 CHARACTERS LINE? 

DAT?: JSR 5. DATTST +GO RUN DATA TEST 
LINE? +ON LINE7 


Y=Y¥+1 
; EST S TSI T TST FIFE eer sesisSsessttSt TTT STS — TT TTT TTT TTT 
RT125: 125 ;ROUTINE @ ‘ 


4‘ 


; ESS OF NEXT TEST t 
100. ; ITERATION COUNT * 
at +SCOPE ENTRY POINT x 
= 
: RUSSTRASTLLSAALTA ALLS äXäXXXT.XECE——— 
+VATA TEST 100 CHARACTERS LINE10 
: 5. DATTST GO RUN DATA TEST 
7ON LIME1IO 


YsY¥41 
; eet sis Pere res rstsestesestst este TTT eT TTT TTT Tit 
RT126: 126 ;ROUTIME 8126 1 





⸗ 


RT127 sADDRESS OF NEXT TEST z 
100. + ITERATION COUNT x 
reas +SCOPE ENTRY POINT z 









SESSSILLIITLI8I 888858525502 29525582 2222005222724 


G0 RUN DATA TEST 
Lloret 7ON LINEI1 
s 


TEST 100 CHARACTERS 
5, DATTST 





3 
z260 RUN DATA TEST 
sON LINE! 


100 CHARACTERS LINE 
"Ss ; &. DATTST 


oem eeeuemaeeeees 


100. ion cont s⸗ : 
DAT14 ;SCOPE ENTRY POINT t 


XsX+1 
; SSSRRSSERREESRaEEaese sees eee sateereeeeeeeeeteTAeeAAAAAAAAAAAAAAE 
‘DATA TEST 100 CHARACTERS LINEI4 





K § 
gh LGC TST yt 3OA(1052) 28-APR-78 13:48 PAGE 62 SEQ 0062 


28-APR-78 13:4 

















3175 015014% 004537 006312 DATi4: JSR 5. DATTST +GO RUN DATA TEST 
3176 015020 000030 LINE14 ON LINE14 
3177 000015 Y=Y+1 
3172 ; RECSERESASSTL ALE ALL ALL SSL ETS SSS LISS ITS SESS L845 255509550524592200920892721 
3179 015022 000132 RT132: 132 s+ROUTINE 81 z 
3180 01502% 015040 +ADORESS OF NEXT TEST z 
3181 015026 000144 + ITERATION COUNT z 
3182 015030 015032 DATIS +SCOPE ENTRY POINT i 
3183 000132 X=X+1 
318% ; DATA TEST On CUR aaat SEER SESSSSRSSERSSSERESESESES SESE SESE STREET ESET ETEE 383 
3185 sDATA TEST 100 CHARACTERS LINE1S 
3186 015032 004537 006312 JSR 5, DATTST +60 a DATA TEST 
3187 015036 000032 LINEIS ON LINEIS 
3188 000016 YsY¥+1 
3189 ; TALL TLL SLES 3588325 583885588958995509555994055000520820002220225% 
3190 015040 000133 RT133: 133 ;ROUTINE #133 1 
3191 0150%2 015056 g 
3192 5084 000144 ; a 
3193 0150%6 015050 +SCOPE ENTRY POINT z 
319% 000133 
4 SSSSTITLTI852038095555355523525535252221 
3197 006312 
3198 
3199 
TEST 100 CHARACTERS LINE? 
006312 5. DATTST 


BSS ASE EP ULTET 
















JSR 
LINEI7 


X41 
+ SIRATAATAAALAATASAAIAAALI IAEA I27: (eee eeeeeeeeoeee SSIAIAAAIATALAIIAIIIIT 
at Ye et ꝓ Coane enrteo ON LINES S1MUL TRNEOUSL Y. 










; ; THE FOLLOWING 


Be ear 








RT13SA: CLR TUMNTAB 
ie 5. BNOVE 
TUMNTAB +1 : €200 
177 s ENTRIES) 





SEQ 0063 


5 


L 


13:48 PAGE 63 


28-APR-78 


MACY11 30A(1052) 


Z28-APR-78 13: 44 


1A LGC TST 


CZDMADO Dri 
CZDNAD. P11 


















~*~ 
oO 
oO 
a) b= rae 
ax @ * 8 
uw 
T Oe * 9 
: = § = i - 
a w * be a 2 t+ +] 
be i=) 8 
— — 3 oa = 
= ¥ 2S ws 8 — at * 8 
= 3535 
s2 —— © z f 2 —* wv 5. 
=] = © Ox — pyr 
Ss, oy § = E û— 
- oo ios ee = 
- — & ~ wr ye 
er S25 5 & 
“3 ig oF 2 * + 
suszoess we 338 a 
** *S *@ ‘eo *S ‘eS ** * *S "2 °@ *@ ⸗e ** *@ =z °S *S *& *& *@ *@ © @ * = "* *@ -« 
























2 
3 
oi * 
ẽ 
5 i wEslStSeeh< 
5 
* re 8 sé 8 ẽ. * * 
PH 3333 ass 
5 82 a 2 8888 
f ge82 3333335 : age as sree 
Se ge 22228 3 fe ss Sees 
388 5 z5355 S 
Susseisegcseacadenaascead GESUEGGEQGGE GRHGERERHGEE 
NAN 2USB3sPeguONe 2 ss 
szeneenesasavavavauaened OURISSGGRHGHG Geugngunagua’ 
— ehetet 44-4 SASAGREMANAR AMARA AAAS SAAR AC CR OER ER ER RARRARE 


CZDMADO 
CZDMAD. P 


ß 


Sh ESEEE REE Tre Per PER EET 


— G ER RUHROEHERBGHE 


DM11A LGC TST 


11 












tL 


3 








o 











a ee 
Mn 5 
MACY11 30A(1052) 28-APR-78 13:48 PAGE 64 


Z28-APR-78 13: 44 






4. 


‘CLEAR ALL BUT LINE NUMBER IN T 
10$: MoV STUMNTAB, %1 


‘TEST THAT THERE 1S AN ENTRY FOR EACH OF 
12S: CLR XMTDAT 


138: 



















gD 
5 


te De Se Be Se 


3 











MoV #16. .%2 ; GET 
115: DEC %2 ; 
BNI 12$ 
BIC #160777, (1)4 7 CL AL 
BR 11$ ;00 NEXT TT ADDRESS 


ö— — r——— — — — — 
SEQ 006% 


UMBLE TABLE ENTRY 
; GET AL TT ADDRESS 





THE 16. LINES 





T 
14: ‘TEST FOR LINE ENTRY 
5$ +BRANCH IF FOUND 
2 + DECREMENT SCAN COUNT 
145 +LOOK AT NEXT ENTRY 
RCVDAT 
sERROR! NO ENTRY FOUND FOR THIS LINE 
16$ +G0 TO EXIT 
15$: 3. +DECREMENT LINES FOUND COUNT 
168 BRANCH IF ALL LINE TESTED 
001570 #1000, XNTDAT + INCREMENT LIME NUMBER 
138 +60 DO NEXT LINE 













164004 ;SET 

164002 3: SET 
MRI 
370 
sCL 
;WA 
:Ti 

163752 ; TE 

001566 3 

001570 if 

+ TEST THAT THERE 1S 16. VALIO DATA ENTRIES 


— ee LGC TST 






SSSR UU LUEEER EERE Tartare 


N 5 
13:48 PAGE 65 


MACY11 30A(1052) 


Z28-APR-78 13: 44 


geeeE REFEREE 


———— 





001600 
000020 


28-APR-78 


23: 
3$: 


4S: 


+TEST THAT THE BREAK BIT IS SET 
MoV STUNTAB. x1 


. 


DE 

BNE 

+ TEST THAT THE wee me DATA BYTE IS ALL O'S 
nov STUNTAB, x 


7$: 












MOV * 
nov 816. .%2 
9S: BIC s1e0779.01 + 
DEC 5 
BNE 
+ TEST THAT THERE 15S 
CLR 
nov STUNTRB. x1 
116: chp x4, (1)4 
BEQ 128 
one Otis 
nov x4. XNTOAT 
MoV %4, RCVDAT 
asoent ' 
12: DEC 3 
BEG 138 
AOD #1000, x4 
BR 10$ 
134: SCOPE 
, 32522535 





STUNTAB, x1 
#16. .%2 
(1)+ 

4$ 

138 


%2 
3$ 






#16. .%2 
ee (1)¢ 


13$ 
%2 
5$ 








+GET TUMBLE TABLE BASE ADDRESS 
+GET SCAN th on 

; TEST Ay? VALID A ENTRY 

Arey F VALI 10-0 DATA ENTRY FOUND 






ERROR! MISSING VALID DATA ENTRY 
;DECREMENT SCAN COUNT 

;BRANCH IF 16. ENTRIES NOT SCANNED 
IN 16. TUMBLE TABLE ENTRIES 

; BREAK J SET? 

;BRANCH IF SET 

‘ERROR RISSING BREAK BIT 


+DECREMENT SCAN COUNT 


+ TEST Wy BYTE 
‘BRANCH IF O'S 
ors INCORRECT DATA 


: STEP TABLE POINTER TO NEXT DATA BYTE 





NUMBER IN TUMBLE TABLE ENTRY 
TUNTAB, X1 


‘CLEAR ALL BUT LINE NUMBER 


A TUMBLE TABLE ENTRY FOR EACH LINE 


CLEAR LINE NUMBER 


+ TEST —* LINR ENTRY FOR THIS LINE 
*BRANCH IF FOUND 


FERROR! NO LINE ENTRY FOUND FOR THIS LINE 





sEXIT 
7 ALL 5 BEEN FOUND 
F YES 


4 he 
H FOR 
XT LINE 








$ OPE 
SESTLASAATTAAAARAAAATASATATALAAAAAAATARAAAAVAAAAANAAAAAAAAAAA? 


ieeiGar. gar gee ee — — — — — 
WACY11 30A(1052) 28-APR-78 13:48 PAGE 66 


CZDMADO DM11A LGC TST 


CZDMAD. P11 


EELEEEE REEL ELE: 








Z28-APR-78 13: 44 


000137 
01 






016116 
000002 


016110 
000143 








005602 


RT137: 137 sROUTINE @ 137 * 
RT140 #ADOR OF NEXT ROUTINE. * 

+ ITERATION COUNT t 

og +SCOPE ENTRY POINT. z 


X+1 
; ; SSSSSSSSEESaasaeeeeeaseesseesssseesesgseansseeseeeaeetssettteetssssss 
3 eer tical ON EACH LINE WITH A DELAY BEFORE STATING THE 


RT137A: JSR 5. @#DL YM1T 4 DOO TEST. DELAY 
HIS MUCH BETKEEN LINES 
; , NESSSRRESRAASEREEAEEE TELE AEESEEESSSSSRERSEESSSESSESS IES 0020000800021 
RT140: 140 ; INE @ 140 * 
T141 sADOR OF NEXT ROUTINE. 2 
+ ITERATION COUNT £ 
RT140R + SCOPE ENTRY POINT. A 


X=X+1 
; Danae tO TST TTS testis ts sesso ssi se esse seSSS TSS EST SST STE TTT TTT 
— ee ON EACH LINE WITH A DELAY BEFORE STATING THE 
RT140AR: JSR 5, @&DL YXIT 60 DO 


TEST. DELAY 
; THIS MUCH BETWEEN LINES 
; ta v 


RT141: 141 + ROUT 
RT142 +ADOR OF NEXT ROUTINE. & 
+ 1 TERATION COUNT x 
ld ag +SCOPE ENTRY POINT. a 


X+1 
; , SSSSESSESSERRREEEEEEEEEESEEReeEREREEAEEEEEEEEeeeEAAAAEEATATTTIN 
‘TEST TO TRANSMIT ON EACH LINE WITH A DELAY BEFORE STATING THE 
; NEXT or 





THE iS MUCH BETWEEN LINES 
; ; SESSRSSRESERRSERRSEAELELE ATER SSRESERRESERESERESSR SERS ESEEAIEAAEEAAEETEEs 
RT142: 142 +ROUTINE @ 142 4 
RT143 7ADOR OF NEXT ROUTINE. 
+ ITERATION COUNT x 
RT142A >SCOPE ENTRY POINT. z 


X2X+1 
; , SESESSIATSAAL AAA p —y»yvx TTI LATTLITLITT 222222222272 272 
Bi on ON EACH LINE WITH A DELAY BEFORE STATING THE 













RT142A: JSR 5, @#DL YMIT +GO 00 TEST. DELAY 
4 + THIS MUCH BETWEEN LINES 
; SESAESESSESUNESEESEESeEETEEESETSEEgRESESEESATSEASALEATAUTSERAUSEISEIEE2 
RT143: 143 OUTINE @ 143 * 
T144 ; AOOR OF NEXT ROUTINE. x 
+ ITERATION COUNT x 
RT143A +SCOPE ENTRY POINT. a 


X=X+1 
+ REXSEAATAAAATATAL ALTA LAA AAT AAA AAAAATAL AAA ALATA ALATA 
+ TEST TO TRANSMIT ON EACH LINE WITH A DELAY BEFORE STATING THE 


— — — — 


Lee 


4 30A (1052) 


CZDMADO DM11A LGC TST 
CZDMAD. P11 


3455 


wet 
So 






— LLLLPPEPEERERP LT EEE Eee 


016110 
016114 


016116 
016120 


a 
Qa 





i Ge 









004537 
000002 
000144 
016134 
00000 


2 
016126 
000144 





ae 
EK 





So 
* 
— 
= 
—X 


28-APR-78 13:4 


005602 


005602 





001 
001570 








C 6 
28-APR-78 13:48 PAGE 67 
sNEXT LINE. 
RT143A: JSR 5, d#OL YXIT GO DO TEST. DELAY 
7 THIS MUCH BETWEEN LINES 
; SENESRAESARERESENELENEAELESEEESARSERSSERRAEASSASSEAESTINS E882 00900000081 
RT144: 144 4 IME @ 14% z 


⸗ 





OF NEXT ROUTINE. * 
; ITERATI * 
RTI44A +SCOPE ENTRY POINT z 


X=X+1 
; Deane TTT TTT ISTP TES STS SSS T ESTs STS SOSSSSESESESES TT TEE TTT TTT 
+ TEST TO TRANSMIT ON EACH LINE WITH A DELAY BEFORE STATING THE 


XT Li 
RT144A: JSR 5, dD. YMIT +GO DO TEST. DELAY 
THIS MUCH BETWEEN LINES 
; nzieaaꝛaaaaaasiituiui · iccccui·h. xaauiuiuuuuun 
RT145: 145 OUTINE @ 145 a 








RT146 OF NEXT ROUTINE. * 
100. ; ; ITERATION COUNT * 
hte a SCOPE ENTRY POINT. x 


X=X+1 
; SAN PP NR 


+ TEST THAT THE Di WORKS PROPERLY WHEN THE HALF -DUPLEX yi 3 BiT 1) 
21S SET. seats Test. TRANSHITS DATA ON LINE 0. AND tp * LINE 1. ONLY 
>THE B REAK SHOULD BE RECEIVED ON LINE O IN THE TUMBLE T 















































aT 185A. CLR *CLERR THE FIRST TuO 
CLR TUNTAB +2 ; TUMBLE 
MoV SOUTBUF . CAT + SET UP 
nov 8-1.UCT Ps 
nov 2 OCSR + SET MAINT BITS 
nov SLB170. aBAR ; HNE 0 
MoV SLEIT1.aqBKCSR ; LINE 
Mg F — 
CLR @BKCSR BREAK BIT ON LINE 1 
+ TEST THAT ONLY THE BREAK WAS RECEIVED 
ore * 000. ruma ;TOST FOR BREAK ENTRY (LINE 1) 
MoV TUNTAB.RCVDAT ;:GET ACTUAL ENTRY 
MoV #141000, XNTOAT ;GET CORRECT ENTRY 
— * A “ee BREAK ENTRY 
1$: MOV TUNTAB +2. RCVDAT ; TEST THAT NEXT ENTRY IS CLEAR 
BEQ sEXIT IF CORRECT 
CLR XMTDAT 
ERROR! SECOND ENTRY WAS NOT CLEAR 
25: T acsSR ‘WAIT FOR THE TRANSMITTER 
7% P) ; TO FINISH 
SCOPE + SCOPE 
; Tb NG eee eaeaANRs SERERERSSEERRSSERERRREERERELALTIAT IITA ITY 
RT146: 146 + ROUTINE @ 146 z 
TLAST ; OF oy dl ROUT INE : 
7 


RT146R ; 


ö— — — ——— ———— — 


SEQ 0067 


CZDMADO DOM11A LGC TST 


CZDMAD. P11 


Ree 


USELESS LEE atta 









Z28-APR-78 


000146 


013737 







3737 
005037 
012777 
012777 
012777 
—3 
000o 
005304 


e 
2 





ge FREE 582 
aseeeseeni sete: 


a 











MACY11 30A(1052) 


13: 44 


N= 
Je 
8 


X 
— 


001566 


001566 








OC 1566 


28-APR-78 


6 <= 


D 
13:48 PAGE 68 


SEQ 0068 


X=X+1 
Dei D DLT ä esses iss ese es eses EST ST EST ST TTT TTT TTT, 


4§: 
6S: 








‘TEST THAT THE OM11 RESPONDS CORRECTLY TO A RESET 
RT146A: MOV SOUTBUF. CAT +SET UP TO TRANSH 





ecsr 
LBITO. aBAR 
T1. @BKCSR 
x4 


@CSR, RCVDAT 
3$ 


@BAR, RCVDAT 
4§ 





$$ 
a8. .%4 


5$ 
@CSR. RCVWDAT 
7$ 


95 
@BAR. RCVDAT 
8$ 






* 
@BKCSR. RCVDAT 
9S 


iT 1 
+ CHARACTERS ON LINE O 
+GET TIME TO TRANSMIT 


0 

Z CHARACTERS 
+SET MAINT., HALF DUPLEX & GO BITS 
+START TO TRANSMIT ON LINE O 
+BREAK ON LINE 1 


sWAIT 2 CHARACTER 
; TIMES 


> RESET 
>GET CSR CONTENTS 
;BRANCH IF O 

sERROR! CSR DID NOT CLEAR 
>GET BRR CONTENTS 


;BRANCH IF O 
/ERROR! BAR IS NOT CLEAR 








+WAIT 8 MORE CHARACTER TINES 


+TEST THAT CSR IS CLEAR 
*ERROR! CSR WAS NOT CLEAR 
60 TO EXIT 

‘TES THAT BAR IS CLEAR 
sERROR! BAR DID NOT CLEAR 
+ TEST THAT BKCSR 1S CLEAR 


sERROR! BKCSR DID NOT CLEAR 
+ SCOPE 


eae a tly een ene cc 












eee SSeS — — — 
E 6 
CZDMRDO oatte LGC TST meet 30A(1052) 28-APR-78 13:48 PAGE 69 SEQ 0069 
CZDMAD. P 28-APR-78 13:4 
3553 +PRGi- TRANSMITTER SCOPE LOOP 
3554 016514 PRGI1: ; BEGIN 
3555 016514 104000 TYPE + TYPE PROGRAM TITLE 
3556 PRGIM 
3557 JSR 7, PARAM +GO GET USER PARAMETERS 
3558 PRGiIR: JSR 7, LOOP 60 LOOP TRANSHITTER 
3559 PRGiB: TST aBAR ;MAIT FOR * LINES TO FINISH 
3560 BNE PRG1B +;BRANCH IF NOT DONE 
3561 PRGIC: CLR acsre + CLEAR THE CSR 
3562 CLR PRG1D + CLEAR DELAY TIME 
3563 016570 MoV @SWR. PRGID +GET DELAY 37440 
3564 016570 BIC #377. PRGID 33440 
3565 SWAB PRG1D 33440 
3566 DELAY ;DELAY AS SPECIFIED 
3567 PRS1D: OPEN +BY USER 
3568 BR PRGIR ; LOOP BACK 
3569 
3570 









































































F 
CZDMADO DM11A LGC TST MACY11 30A(1052) 28-APR-78 13:48 PAGE 70 SEQ 0070 
CZDMAD. P11 28-RAPR-78 13: 44 
3571 
3572 +PRG2- RECEIVER SCOPE LOOP 
3573 PRG2: 
3574 TYPE 
3575 PRG2NM 
3576 016720 JSR 7, PRRAN PARAMETERS 
3877 737 016772 PRG2R: JSR 7, LOOP ITTER 
3578 000001 162724 PRG2RA: #8170. aCcSR AR THE OTHERS 
3579 77? 162722 PRG2AR: TST BAAR “ES SELECTED FINISHED 
3580 01 BEQ PRGZB SHED TRAMSNITT! NG 
3581 108777 162712 TSTB @CSR 
3582 100372 BPL PRG 
3883 082777 000200 162702 BIC #6177. acsR 
3584 020127 001776 CMP %1. STUNTAB+176 AT THE END OF THE TT 
3585 001002 BNE + 
JS86 012701 001576 nov 
2587 005721 TST 
3588 000755 BR T TRANSMITTER FLAG 
3689 005077 162660 PRG2B: CLR 
3590 005077 162656 C 
3591 G0S037 016714 
3592 G17737 16230% 016714 7744) 
3593 042737 016714 77440 
RS | OOO337 016714 774 
3595 104400 z AS SPECIFIED 
3596 —V sBY USER 
3597 000732 PRG2R sREPERT LOOP 
3598 
3600 SUBROUTINE TO GET USER PARAMETERS (FOR PRGi & 2) 
3601 10%000 PRRAN: TYPE ;ASK USER WHICH LINE 
3602 020154 LINPAR +TO TEST 
20 o ruuis 5. RECD ;GET LIME AND PUT IT 
Jats ocooco L INE: ; MERE 
1635 108000 PRRANA. 7RASK USER HOM MANY 
3606 020177 HOWNAN >CHARACTERS TO TRANSNIT 
3607 O08S537 004416 JSR 5. RECD +GET CHARS AND PUT IT 
3838 ooooco CHARS: O ; MERE 
3609 023727 016742 000310 Crip CHARS. #200. s+LIMIT RESPONSE TO 200. 
3610 101403 BLOSs FRRANS 2(CORE LIMITATION) 
a See ices 4 
313 000764 BR PARANA *RE-REQUEST PARANETER 
3614 10%000 PARAMS: TYPE s TYPE INSTRUCTIONS 
3615 020043 My 
3616 104015 CNTLU :60 GET VALUE 
3617 000207 Ts 7 sEXIT 
3619 
3620 + SUBROUTINE TO TRANSMIT DATA FROM THE 
3621 117737 162204 017102 LOOP. MOVE @SWR, OUTBUF sFULe 
3622 004537 006224 JSR 5. BMOVE > BUFFE 
3623 017102 OUTBUF sWiTH 
362% 017103 OUTBUF +1 ;DATA TO 
3625 000307 199. + TRANSHI 
3626 012777 001400 162530 MOV SCAT. @BRSREG ? INITIALIZE BASE REGISTER 














CZDMROO DM11A LGC TST 


CZDMAD. 


PECEURROEREESEE Rett eeereyvernnr ens 


RERSSSSSS SECEEEERRELE 


Pi1 


017020 
017026 
017032 
aire 
017040 

7086 







i 


rerziae 












— 


* 
an 


— 


MACY11 30A(1052) 
28-APR-78 13: 44 
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G 6 
28-APR-78 13:48 PAGE 71 


001400 MOV SOUTBUF, CAT 
5. BOVE 


001440 MOV CHARS, WCT 
NE WCT 
JSR 5, BNOVE 


001564 MoV LINE, 
162444 MoV zue. @BRR 


. = INBUF 4100. 


a86. - (SP) 







3$ 
(SP 4, (SP 4 
SHR 





* yaaa SUR 
842. a846 
i$ 


















COUNT 
THWO'S COMPLEMENT 


} «le BE 
SAVE LINES TO BE TRANSMITTED ON 


24 TRANSMITTING ON SELECTED LINES 





+SAVE VECTORS 


+SET UP FOR TiMouT 
+REFERENCE HARDWARE SHITCH REGISTER 


sADJUST STACK 
sPOINT TO SOFTWARE SHITCH REG 


é G. 
801SPREG DISPLAY POINT TO SOFT DISPLAY REG 
se +RESTORE VECTORS 


CHECK FOR G BEING TYPED 


sACTII? 
:BR iF YES 





+ROUTINE TO CHANGE CONTENTS OF SWREG(LOC 176) 


001202 CNTLUU: * 






SSWREG, SUR 
F UX 








GF hg ——— 
CCDMADO DMIIA LGC TST  MACY11 30A(1052) 28-APR-78 13:48 PAGE 72 SEQ 0072 
CZDMAD.P11 = 28-APR-78 13: 44 





017641 SSWREG 
004537 006154 JSR R5. OACNV + CONVERT TO ASCII 
000176 SWREG 
017647 SVALUE 
000006 6 
104000 TYPE 
3689 017576 017647 SVALUE 
3690 017600 004537 004416 JSR 5. RECD +GET TMP1 AND PUT IT 
3691 01760% 000000 THP1: 9Q + HERE 
3692 017606 022737 000007 004574 CMP #7, CNT 
3693 017614 001403 BEQ F JX 
3694 017616 013777 017604 161356 MoV TMP 1, aS + CHANGE CONTENTS OF SUREG 
3695 017624 000002 F JX: RTI 


ö — — — — — — 





ae | 6 
CZDMADO DM11A LGC TST MACY11 30A(1052) 28-APR-78 13:48 PAGE 73 
CZDMAD. P11 28-APR-78 13: 44 









3697 + MESSAGES 
3698 017626 O53045 041505 020124 WHERE: .ASCII 'XVECT ADR?a' 
3699 017634 037522 
017641 SSWREG: .ASCI! ‘xSWR=a' 
017646 
017647 SVALUE: .ASCII ' NEW=2' 
O17 be 
017662 
017666 SCTLU: .ASCII '‘XINCORRECT INPUT, TRY AGAIN! * 
017674 
'%sQ' 
**UNIT#(B8) 72° 
"2CHAR LNGTHa’ 
"ZERR SA: ' 
' WAS: ° 
: a’ 
*xPRGG2" 
"272° 
"REND a’ 
*%SR=07? GO. 2’ 


“SLD CHAR IN SRO-7;DLY IN SRB-15a° 


"RLOGIC TS7Sa" 
"RAMI TTER LOOPa" 
"RRMIT/REC LOOPS’ 


"XTYP LINES TO TST a° 


"AHOF CHARS?Q' 


SEEELEP OSS) SSESERC ALIEN GREEEEEEEBEREEEPETEPER 


Ean cots 





"ZR J 
& PCs’ 
a: 





aad 


J 


13:48 PAGE 74 
QUICK BROWN FOX JUMPED OVER THE LAZY DOGS BACK 1234567890° 





28-APR-78 
BYTE 15.12 
-ASCII 'T 
END 


MNSG1: 


78 O- 
553 

5 — 

— Sao 


052) 


MACY11 30A(1 





~~ 
=z _— 
z SggnaSesgcs 
* — 
e+] 
of segusaegesass 
ue * 
yi |= BebSSEEES 
Bee 
is 
wr 


ee 


RERRRRE ZEB 258 


CZDMADO Dri 
CZDMAD. P11 





CZDMADO DM11A LGC TST 
CZDMAD. P11 











4 
4 
ok 
—X 
ty 
; 





28 7 : 








2665 
437 


ELTA 


= 
— 








eeeeet 


MACY11 30A(1052) 
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23418 
178 


REL 


NO 
SERRE 


Se neees 


BE33 8 





Z8-APR-78 
28558 30338 
764% 770 
2719% 2720 
10338 11312 
2083 2086 
2801 2803 
15202 1951% 

3626% 

1132 1305 
1718 1722 
1269 1812 
1332 1362 
1393 1547 
1269 1308 
1132 1736 
1756 1760 
1775 1779 
1132 1318 
1355 1384 





1388% 
21063 
1539 
2887 
3030 


13:48 PAGE 


2730 


1245 
2089% 
28333 
1952 


— 
tne 
~ 


Se REz 


S cf 


= 
2 





3227 
2898 








K 6 
GE 76 SEQ 0075 
CROSS REFERENCE TABLE -- USER SYMBOLS 


27408 
1435 1523% 2008 2036% 2038 ZO4Z23 = 20433 0 = 2044 
25433 2547 2551% 25893 725928 26532 726928 27232 
3244 32483 3u8663 3521k = 3532 3545 3559 79 
19602 1961 1982 19863 1987 19935 1992 2009% 
1544 1698 1699 1703 2832 3254 3328 3578 
3251 
2553 2593 
19172 619183 
35222 4863549 
2975 2986 





L 6 
CZOMADO DH11A LGC TST  MACY11 30A(1052) 28-APR-78 13:48 PAGE 77 SEQ 0076 



















































CZDMAD. P11 Z28-APR-78 13: 44 CROSS REFERENCE TABLE -- USER SYMBOLS 

BRKS 014312 9208 

BRKG 014330 29318 

BRK? 014.346 9428 

CARMSK 001572 1114% = 1334 1364 1603 2701 2731 3278 

CAT 001400 1 1009 1030 11288 1256 1520 15213 2009 2534 2648 Z2649% 2659 

2689% 2720 3483 35153 3626 3627% 3629 3620 

cc = 177776 

CHALT = 104003 

CHARS 016742 3609 3632 

CLKINT 001552 10612 11298 1317% 

CLELVL 001554 6928 11302 

CNT 004574 11752 0611928) = 12118 3652 

CNTLU = 104015 5198 860 3616 3674 

CNTLUU 017546 729 36808 

CNVDAT 783 765 8008 

COUNT 002076 74S | 610NNR — — O11NI mo = 1421 15313 15353 

CSR 001542 6878 S832 10313 1081 1088 11328 4611378 «611448 861248 12613 1276 13053 
1306 13083 861310 13188 13268 1327 1351 1353 13553 13808 1384s 861385 
13873 «8614178 861439 1442 15483 1647 1549 1552 15568 1557 1682 1698s 
1699 1703 861704 17178 )=—:1718 i 1723 17368 8 1737 174128 17553 1756 
17603 1761 17743) =: 11775 17798 1 17938 «61794 17983 861799 1813 1817% 
1818 18313 1832 18363 1837 18513 185% 18582 18593 1860 20583 2059 
2062 20653 2069 2093 2117 21308 21313 21493 21572 2158s 2553 2557% 
25583 25678 2593 2617 26193 2620 26528 265% 26568 2657 2693 269 
26978 27213 272% 2726 27288 4 27708 2775 27778 «= 2781 2797 2832 2834 
28368 2847 2849 32083 32493 3251 32543 32588 33288 3330 3337 34853 
3488 3503 35203 3529 3541 35612 35783 3581 35833 35893 
7048 4 873 917% 
15308 3043 3054 3065 3076 3087 3098 3109 3120 3131 3142 3153 3164 
3175 oan 3197 3208 





Saseueesess: 8 
Se A ee ee ee 
sezzes2 : 
trek 
Se & 


iwi te 
ast | 


1931 26N5 2573-2590 259826302795 222 CR] ED 





aZets 


3420 3432 S444 3456 3468 
1056 





0188 
076 


SEQ 0077 


6 


MN 
CROSS REFERENCE TABLE -- USER SYMBOLS 


13:48 PAGE 78 


Z28-APR-78 


MACY11 30A(1052) 


Z28-APR-78 13: 44 


iA LGC TST 


CZDMRDO Dri 
CZDNAD. P11 


4 a z= — 
SCnun et Pat Kn 





— 


yours 


et et ome PY oe 


anGs 


22235238 


Zesza⸗7 


— 


pnp 


23535866 


pet pea 





oo ot ee 


ERROR = 104001 


ERRORI= 104011 


27142 


25863 26008 26463 26472 26738 26742 


ERRVEC= 000004 


-§ 
cha 


# 
£ 





S 
5 g 
⸗ 
3 g ¢ 
: g ae 3 


3522 


SERRSIRRIBRASS CER GESMERS ASSES Sz Pe SnBaa52 





Rugg § 2835 aucedes?? eebasdan RASSERE 





3823 
$32 





5 gz 2°ger 
acu Hae 
— i = 


——— — 


CZDMADO DM11A LGC TST 
28-APR-78 13: 44 


CZDMAD. P11 








: = 8288888 8 
Co = 

s ẽz : 
S foresee 858s 
















LINE 
CINE? : 000002 
a 
LINE10= 000020 
LINE11= 000022 
LINE12= Q00024 
LINE13= 000026 
LINE1%= G00030 
tists See 
* 
LINES = QO0006 
L«NE® = 000010 
LINES = 000012 
LINES = 000014 
LINE? = G00016 
LINPAR 020154 


43 


— 





aie 








— 












——— 


gen 


—X 
88 





MACY11 30A(1052) 


> oO Ln oe ot ot 
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et 












NN 
cath nats 
23 





J 





= 
~~ 


Bossgest 
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Z8-APR-78 PAGE 79 
CROSS REFERENCE TABLE -- USER SYMBOLS 


1101 








1103% 


BER 





od ed nd Od Ed BA 
ES Te 
SSSHLS 


aBS¢5 


Cd hot 
ont ae 
25 


13: 48 


1104 


1365 
28073 


1109 


16573 
141623 


3 


2353 


11112 


2622 


14262 
36048 


11128 = 1113 
2623 2627% 2787 
1518 15303 1576 
3638 3639 





SEQ 0078 








NRE: eee 

8 7 

CZDMADO DM11A LGC TST MACY11 30A(1052) 28-APR-78 13:48 PAGE 80 SEQ 0079 

CZDMAD. P11 28-APR-78 13: 44 CROSS REFERENCE TABLE -- USER SYMBOLS 

m 747 1055 1075 1107 1207 3612 37238 

M2 eins) 37248 

n7 857 37258 

ry 3615 37278 

NOP 6s 4 354 

NXTST 874 900 912 914% 

OAC NY 800 804 14868 3684 

ORCNVA 

OPEN = 682 684 686 691 693 695 696 697 698 699 701 
705 706 707 708 709 734 735 736 737 742 779 
957 958 1004 1152 1153 1459 1460 1469 1470 1471 1644 

t a4 } = 1649 1650 2546 2574 2591 2599 27% 3243 3334 


96 
1255 1298% 1413 1521 1532 1594 1600 3231% 3277 3483 3515 
3624 3627 36438 3644 











OVRLAY 2 11568 
PRRAN 36018 
POR RAR 
PRE RNB 
PARO 
PAR 1 
PARZ 
PARS 
PARY 
PARS 
PARG 007042 
PRSS 002116 902% 
a oe | le 
POPS? = 005726 629 
POPSP2= 022626 2736 
PRGLIMN 002014 
PRGMUM §=6002454 840% 841% 844 850 
PRGTAS 002016 
PRGON 020103 
PRGOR 007120 
PRG1 016514 
PRGi8 016530 | 
36 35 35648 35652 35678 
PRGiN 020117 
PRGIR 016524 3568 
PRG2 016574 
fee, ee 
016616 
016656 
—** 3593 35942 35968 





3597 


zaauGRe 


333 
aaa 





4758 2150 
4749 692 694 


CZDMADO ON11A 
CZDMAD. P11 

PRTY6 = 000300 
PRTY7 = 000340 
PRYCNT 002104 
PSH = 177776 
PTO 006100 
PT1 006102 
PHRUP 004606 
RCVDAT 001566 





eee 
RSREEE 
Re 









ese RL at 


. F a 
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2223222338 
eagysgeees 


33 
















$3 





ebege 
si 


tad aolk 


DOD © oe oe oe oe 
7 SS Be 


Z8-APR-78 13:48 PAGE 81 SEQ 0080 
CROSS REFERENCE TABLE -- USER SYMBOLS 
543 843 847 1010 1130 1138 1264 1268 1301 1321 1324 
2568 2647 
1918 1982% 994 
10328 8611338 1138% 12628 1264% 1268% 1301% 13192 13218 1324% 2132% 
vais 2559% 2561% 25682 
14753 814788 1479% 1480 1481 
805 1245% 1252% 1256% 1257 13318 1332% 1337 1344S 613563 8613618 
13993 814003 1435% 1442s 1579s 1598% 16042 16108 16178 18542 18602 
18862 19113 1912 936% 19522 953 19613 19872 1988 20213 2038% 
2069% 33 0621108 «21178 25478 25638 26228 26632 26982 2699% 
2732 27718 27782 779 803% 28 28373) 8=63244% )=632798 03s 3280 33042 
SY9SS 863499 535223 3532k I35uix 35452 35492 
2361 2372 2383 2394 2405 2416 2427 2438 2449 2460 2471 
2504 2515 
1070 1099 11738 3603 3607 3690 
1466 19698 14763 
983 
1619 16336 1641 
979 9818 
9828 
1221 
9578 
958% 
1512 
871 913% 1667% 16702 
16738 


LL ee 


CZOMADO DM11A LGC «ST  MACY11 30A(1052) 28-APR-78 13: 48 
CZDMAD. P11 78 1 


PAGE 82 
28-RAPR- 3: 44 CROSS REFERENCE TABLE -- USER SYMBOLS 


1857 








SEG 0081 


E 7 
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NH 













3 



















TRE CRPELR PER ERT ETS 


agScb SEE 








012040 
012056 
012074 
012112 
012130 
012146 2410 24208 
012164 2421 24318 
007622 (7671786 
007532 1788 17938 
01222C 2443 8 24538 
012236 2454 24646 
012254 2465 8 24758 





CZDMADO DON11A 
CZDMAD. P11 


: é 
; 





dd md od 
zx 


sata 








MACY11 30A(1052) 
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SSSR SgRegueeNe se 


BaREGrSERSEEN 





™“ 
* 
* 








PAGE 8 
CROSS REFERENCE TABLE -- U 





\y 
SER SYMBOLS 


1684 
1971 
2738 


1344 


2897 


1356 


1361 


ö— — — ————————— ——— 


3322 


i393 





SEQ 0083 

1783 1802 
2095 2119 
3505 

1889 1915 
36942 

3517 3518 
1397 1400 


LL See — — ——— — 


CZOMADO DM11A LGC TST  MACY11 30A(1052) 28-APR-78 13:48 PAGE 85 
CZDMAD. P11 Z28-APR-78 13: 44 CROSS REFERENCE TABLE -- USER SYMBOLS 


15383 1540 1541 1583 1585 2699 2729 2822 2827 2851 3226% 3228 

260 3273 3279 3288 3299 3323% 3325 3326 3343 3353 3363 3374 
S481z 3482x 3493 3495 3499 3584 3586 

9848 

994 

9918 

9958 1000 1002 

988 991 995 999% 1001% 10048 

777 7 836 856 903 i 1 107% 1097 1106 


746 80 045 054 1068 
1208 1664 3555 3574 3601 3605 3611 3614 3682 3688 


1072 1077% 1078% 1079% 1083 











































































10528 
1060 
1049 1051 1052 1057 1059 1061 i 1063 
10298 11278 1252 15228 1589 265138 913 27228 «28313 3uBus 35162 
3635 3636 
Hath 
1672 16778 1689 16948 1708 17138 12 17328 8617%6 17518 1765 17708 
17898 © 1803 18088 1822 18278 1841 18468 1865 18708 1897 19028 1923 
1940 19458 8 1972 19778 861999 20008 2026 20318 2088 20538 2072 20778 
22798 «= 2285 = 22908 «= 22% = 23018 «9862307 03S «23128 «= 2318 43S 23238 2329 82348 
2353 = 23588 = 236% = 23698 «= 2375S 23808 «= 2386 24028 8624808 
ZuzuG = 2430 2N358 «= 2841 = 20868 286B8 Zu Tu 24798 
2496 = 25018 §=62507) = «25128 2519 5 2602 26078 
2676 §=626818 §«8692759 §8=6276N8 §=0 2811 43= 28168 «= 2857) 38 2879 
28958 482901 2912 «629178 «62923 §=629288 «62958 29508 
2967 829728 ha 298 6843000) 630058 «693011 30168 3022 
30008 ————⸗ 3068 = 30738 «63079 ⏑ «= 3090S 30958 
3112-34178 =63123 35 318 8631598 «63185231508 863156 2S 31618 89-3167 
31838 863189 8=631948 32058 8 3211 32168 3313 33188 3398 303s 
382234278 UN e . 3870 3506 
1303 10090 B8 ⏑ 15N5 0 32% 
751 801 12363 = i 13338 «613NS 13 1 346% 
13653 13653 1 is 18018 «618108 «61881g «615782 «615992 16032 
1876 6=6 1878 Sti 184s 8618918 1892 18992 19092 1910 1942 
te ieee ae iit 1M, ie et Ue, ite, ie Be 
ee a i 
br 9g 12603 621 1883 621568 
ave ats) 31%) 2208 82216 2249 2260 2282 
ue, fet i, Be ttt Be Be, ie 
2307 23178 «862318 «§=623288 §=—. 2.329 2342 2 





SE — —— — 


CZDMADO OM11A LGC TST 





MACY11 30A(1052) 28-APR-78 13:48 
CZDMAD. P11 Z8-APR-78 13: 44 
23748 2375 2386 23968 
24518 24628 8 2463 
28568 28678 2868 
2934 29448 
30108 3011 
30788 3079 
3145 31558 
SCTLU 017666 
SENDAD 00 
SSWREG 017641 
SVALUE 017647 
= 532 534 
562 564 
588 590 
614 616 
640 642 
6798 6818 
1352 1354 
2696 2725 
BAR 002110 
BASRE 002114 
BKCSR 002112 
CSR 002106 
ABS. 020332 000 


ERRORS DETECTED: 0 
DSK2: CZDMAD. DSKZ: CZDMAD. SEQ=DSKZ2: CZDMAD. P11 
RUN-TIME: 7 11 1 SECONDS 


RUN-TIME RATIO: 322/20=15. 8 
CORE USED: 13K (25 PAGES) 


DOCUMENT PAGES: 85 


2397 
24738 
28788 
2945 
30218 


30898 
3156 


1383 
2727 





PAGE 86 
CROSS REFERENCE TABLE -- USER SYMBOLS 
24078 
474 





24188 
2 


